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PP COMPASS PRETEST 
ALS COURSE S3 

1- The name of the routine which handles unit record 
equipment is 

i- All jobs input to scope are placed before 

actual execution. -.■.....■ . ... 

3- SCOPE uses the Exchange Package to: 
a° Store a job's time limit 

b» Store a job's name 

c- Exchange a job's execution sequence 

d. Store a job's registers 

4- What routine<s> are in general control of the SCOPE 
operating system disk input/output' 

a. JANUS 

b. INTERCOM " 

c PFCCP _ 

d. ISP 



ID. 



S- SCOPE system to user communication is provided: 
a- In CMR 

b- In labeled COMMON 
c- On Disk 
d- In RA+O thru RA+77 

b- SCOPE system routines are kept in one or more libraries- 
a- True 
b« False 

7. The SCOPE system uses the FNT for: 

a- Storing information about a job while it is in execution 
b» Storing information about an executing job's files 
c- An input queue 
d- An output queue 
e« All of the above 

&• What are the Pseudo channels used for? 
1* What is the EST in SCOPE? 



SCOPE uses two software packages to control system operation 
One is pp code and the other is cp code- What are their 
names? 
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PP COMPASS PRETEST 
ALS COURSE S3 

1- The name of the routine which handles unit record 
equipment is ZTA K)US 

B« All jobs input to scope are placed OH ot»'S< before 
actual execution" 

3. SCOPE uses the Exchange Package to: 
a» Store a job's time limit 
b- Store a job's name 
Sj» Exchange a job's execution sequence 
ca p Store a job's registers 

•4- What routineCs* are in general control of the SCOPE 
operating system disk input/output* ■' 
a- JANUS 
b- INTERCOM 
c. PFCCP 
(dp. ISP ) 

5- SCOPE system to user communication is provided: 
a- In CMR ' 

b- In labeled COMMON 
c- On Disk 
<33 1" RA+Q thru RA+77 

b« SCOPE system routines are kept in one or more libraries* 
b- False 

7- The SCOPE system uses the FNT for: _/-' 

a- Storing information about a job while it is in execution 
b» Storing information about an executing job's files 
c> An input queue 
d» An output queue 
£e») All of the above , 

a- What are the Pseudo channels used f orf C///f jSgiS iwn*» ">d c* 
1. What is the EST in SCOPE? B&ts.frHe+J- StvJu* TiLl* 

ID. SCOPE uses two software packages to control system operation* 
<>r\e is pp code and the other is cp code- What are their 
names? /t/T/9 C?M7~A 
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FOREWORD 



This book is written to serve as a guide for a PP COMPASS 
CALS Course No* S3>« This class should be of one week's 
duration with a maximum of sixteen students* This book con- 
tains many study questions which serve as learning stimuli- 
Included are copies of visuals which should be discussed 
during the class periods* Maximum benefits from this material 
is received when assigned problems are completed* 

This course is intended for the student with an intensive 
background in computer systems but does begin with the basic 
concepts so as not to exclude a beginner* 



1-3 



GENERAL DESCRIPTION 

Course Title: SCOPE 3-4 PP COMPASS 

Course Number: S3 

Course Length: 5 Days 

Course Size: It Maximum 

DESCRIPTION: 

This course is designed to prepare the student 
for writing code for the Peripheral Processors 
of Control Data's CYBER and bDDD product lines- 
This code is used in the SCOPE operating system* 
This is a lecture plus laboratory course on 
theory and technique of SCOPE system programming' 

PREREQUISITES: 

To attend this course the student should have 
successfully completed the following courses: 

SCOPE 3-4 dob Control No- H2 

Central Processor COMPASS No- 3H 

SCOPE 3-4 Advanced Coding No- SO 

SCOPE 3-4 Analysis No- 52 

In lieu of attending these classesi a PP COMPASS 
Pre-test has been provdided to evaluate if pre- 
requisite classes should be waived- 

COURSE OBJECTIVE: 

The objective of this course is to prepare the 
student for writing PP programs which will inter- 
face with the SCOPE Operating System- To do this 
the student must demonstrate his ability to: 

1- Understand the System Monitor 

5- Understand the System PP resident routines 

3- Use the Sysbem Symbols 

4- Use the System MACROS 

5- Understand External Input/Output 

by performing satisfactorily on all exercises 
and examinations- 
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RESOURCE DATA 

Instructional Materials 

PP COUP ASS Instructor/Student Guide 

System Programmers Reference-" Pub- No* b03DbSDD 

Instruction Description Reference Volume II-i Pub- No- tD3M73D0J 

■ * 

Student Materials 

PP COMPASS Student Guide 

System Programmers' Reference^ Pub- No- fc)Q30fci5u"0 

Instruction Description Reference"! Pub- No- t»03M?3QQ 

Computer Time 



Normal time requirements are one half hour of dedicated 
tija-e_e^cJ3-_da^XQj^_f_Lv_e__d ay sj_:_„„_ 
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COURSE OBJECTIVES 

Upon successful completion of this course the student should 
be capable of accomplishing the following: 

1. Understand and be capable of explaining the main 
functions of the SCOPE System monitors flTR and CPflTR. 
He should know how to make requests and receive re- 
plies from either monitor • 

2. Describe the software functions performed by the Resident 
Routines of the pool processors- Be capable of using the 
resident routines to perform often used software functions^ 

3« Describe the purpose of using the System Symbols in 
writing PP code- Should be able to list several ad- 
vantages of following System Symbol Convention. Should 
know the source of the System Symbols and should be 
capable of changing System Symbols- 

H» Take full advantage of system Macros to perform often 
used pre-described programming functions* Should be 
able to change an existing macro or be able to add 
macros to the system definitions* 

S- Describe the sequence of steps taken by a PP in per- 
forming input/output operations to peripheral equipment 
such as tape drivesi line printersn or other equipment. 

fci- Should be able to addi deleten or change any existing 
PP system program in the system- 
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INTRODUCTION 



LANGUAGE 
ELEMENTS 



SYSTEM 
OVERVIEW 



HARDWARE 
OVERVIEW 



LUNCH 



INSTRUCTIONS 



PROBLEM 1 
LAB 



CODING 
CONVENTIONS 



PP MACROS 



SYSTEM 
TABLES 



LUNCH 



PP 
RESIDENT 



PROBLEM 1 
LAB 



JAY 3 

pp 

RESIDENT 
fcont' d} 



MONITOR 
FUNCTIONS 



LUNCH 



MONITOR 
FUNCTIONS 

•Ccont'd} 



PROBLEM 2 
LAB 



DAY 4 



EXTERNAL 

INPUT- 
OUTPUT 



LUNCH 



EXTERNAL 
I/O {cont'd} 

{SAMPLE I/O 
PROGRAMS} 



PROBLEM B 
LAB 



DEADSTART 



RELOCATABLE 
OVERLAYS 



LUNCH 



RELOCATABLE 
OVERLAYS 
{cont'd} 



SAMPLE 
PP 

PROGRAMS 



FINAL 
EXAM 



EXTRA 
LAB 



I- Introduction 

o Table of contents 

o Forward 

o General Description 

o Resourse Data 

o Course Objectives 

o Course Chart 

o Course Outline 

o Learning Objectives 

II- LANGUAGE Elements 1 Hr- 

o The communications challenge 

o PP COtlPASS Definition 

o PP COPIPASS Simplicity 

o Coding Formats 

o Setting up a PP program 

III- System Overview 1/2 Hr- 

o Basic job flow 

o Control Point Concept 

o Exchange Package 

o Example PP Coding control cards 

o Example CP job for calling PP program 

IV- Hardware Overview 1 Hr- 

o General Overview 

o Barrel and slot 

o PP Registers 

o A register arithmetic 

o PP Memory 

o Hardware features 
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V- Instructions ' 5 1/2 hrs* 

o Formats 

o Examples 

o Addressing nodes Summary 

o Addressing Modes Detail 

o .Instruction .-categories 

o Load and Store 

o Add and subtract 

o Replace add 

o Logical 

o Shift 

o Jump 

o Instruction Problem Set 1 

o Instruction Problem Set 2, 

o Instruction Problem Set 3 

o Instruction Set Answers -Cl-3> 

o Coding examples £12'} 

o Central memory read & write 

o CRD 

o CRH 

o Instruction Problem Set H 
VI • Coding Conventions 1 Hr» 

o System symbol definitions 

o Examples of code using system symbols 

o Symbols come from system texts 

o System texts 

o Prog- Name Conventions 



1-T 



VII- PP MACROS I'H.P- 

o PPENTRY 

o ENfl 

o UJK 

o LDCA 

o CRI 

o BIT 

o U>K 

o ASK 

o SBK 
VIII- System tables and pointers 1 Hr- 

o CfIR Summary 

o CUR Table format description {prose* 

o CUR Pointer Area {Table* 1 

3 o CPIR Pointer area {Table* 2 

o CfIR Pointer area {Table! 3 

o CfIR Pointer Area {Table* H 

o Control Point Area {Table} 1 

o Control Point Area {Table* 2 

o Control Point Area Field definition 

o System Exchange package area {Tables* 

o PP Communications Areas {Description* 

o PP Communications Areas tables 1 

o PP Communications Areas tables 2 
RA Communications areas 

IX- pp Resident 4 1/2 Hrs- 

o Introduction 
o Structure 
o Transient secondary overlay _ 
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o Functions 

o -Cl> Communication fITR - PGM 
-C2> Loads transient Programs 

o Resident Routines {individual Descriptions* 

o Resident Routines {Flow Charts! 

o Resident Routines Actual Code 

o Study Questions -CNeeds work> 

Monitor Functions 3 1/2 Hrs< 

Monitor{s> defined 

o Two monitors {visual* 

List of monitor functions 

Detailed CPflTR functions 

Detailed MTR functions 

Monitor Request Processing {visual* 



XI- External Input/Output 5 1/2 Hrs< 

o The channel hardware concepts 

o CYBER Data channel {V* 

o Two types of I/O devices {V* 

o Channel communication 

Select 
Connect 
Function 
Example 

How data input works 

How data output works 

How status request works 

a Channel characteristics 

Channel I/O instruction list 

Modes of channel functions 
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o Modes of function codes 

o Programming the PP using function codes 

o How to request a channel -Cl> 

o How to request a channel <2> 

o How to request a channel -C3> 

o How to drop a channel 

o How to request alternate channels -C13- 

o How to request alternate channels -C2> 

o How to request alternate channels C3> 

o Input/Output software subsystems 
XII- Deadstart 1 1/2 Hrs- 

o Master clear 

o Hardware boot 

o Software boot 

o Software boot flowcharts 
<III- Relocatable overlays 2 Hr. 

o Relocatable overlay concepts 

o Relocatable overlay Macro for addresses 

o Flow description of relocation code- 

o Alternate method of relocating addresses 
XIV. Sample PP Programs 1 i/s Hrs- 

o PP Prog Example code 

o CP Prog example code 

o Copy of card deck - PPTEST 

o Test error processing - bad address 

o Auto recall error 

o PP call error 

o Hung in auto recall 

1-12 



o Hang PP 

o Assembly error - MJN won't reach 

o Abort 

XV. Lab Problems plus Final Exam 3 Hr s- 



1-13 



LEARNING OBJECTIVES 

LANGUAGE ELEMENTS 

■C1J To describe the communication challenge between man 
and computer showing the difficulty of task* 

-CS3- To preview the simplicity of PP Compass in meeting 
the communication challenge 

■C33- Introduce PP Compass program structure- 

■Cm Use the various language elements to define major 
parts of a program* 

SYSTEM OVERVIEW 

■C1J To describe the basic job flow through the SCOPE 
system 

■C23- To describe the "accounting'* technique of control 
points 

■C3> To give students initial knowledge of entering PP 
programs into system using control cards 

•CM> To describe the process of calling a PP program from 
a CP program* 

HARDWARE OVERVIEW 

•CI> To present an overview of the CYBER systems unique 
hardware- 

•C2J To introduce the programmable hardware features 
of the PP* 

■C3> To present the PP memory allocation concepts 

■CM> To present the additional system hardware features* 

INSTRUCTIONS 

C1J To present detailed information about programming 
the PP. 

■C2J To present central memory to PP Input Output instructions- 

•C3> To present sufficient coding examples and exercises to 
aid student in learning details of PP coding* 

CODING CONVENTIONS 

•C1J To present the SCOPE System Symbol coding conventions 
■C23- To introduce freedom from hand coding by using symbols* 
•C3> To introduce SCOPE System Texts* 
■CM> To introduce SCOPE PP Programming naming conventions* 
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LEARNING OBJECTIVES -Ccont-'dJ 

PP MACROS 

•CI} To present the MACRO as a time savingt error reducing 
programming aid* 

C2> To present pre-defined programming concepts using MACROS* 

C3> To introduce generalized coding techniques* 

•CM} To prepare student to write simple PP Macros* 

SYSTEM TABLES AND POINTERS 

•CI} To present the necessary source information for coding 
system PP Programs* 

•C2} To present the normal methods of information exchange 
between user programs and system PP programs* 

■C33- To define a technique where the information desired by 
the PP programmer can be located although it may not be 
specifically described* 

PP RESIDENT 

•CI} To present the detailed functions of PP Resident in 
order that the PP programmer may take full advantage 
of its functions* 

■C2> To present the interdependencies of the PP resident 
routines* 

•C3} To introduce the PP programmer to actual system code - STL> 

MONITOR FUNCTIONS 

-CI} To define the SCOPE 3«M System Monitor-Cs}* 

-C23- To define methods for users to make requests of 
MTR or CPMTR 

■C3} To discuss specific MTR and CPMTR functions 

■C4} To discuss MTR and CPMTR request processing techniques 
{details} 

EXTERNAL INPUT/OUTPUT 

•C1J To present the external I/O hardware used by the 
CYBER computers* 

■C2> To introduce the methods used by system I/O drivers 
in performing I/O* 

i3> To present enough details on external I/O to allow 
coding of a simple PP program which will input some 
data from a peripheral device* 
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LEARNING OBJECTIVES -Cconf d> 



DEADSTART 



-C13- To present the sequence of events from the time the 
deadstart button is pushed* 

-C2> To give an overview of the software routines in the 
deadstart package* 

<3> To present enough details of the deadstart matrix 

switch program to allow the system programmer to change 
tape channel selection for deadstarting* 

RELOCATABLE OVERLAY 

<1> To present the techniques and requirements for using 
relocating PP code- 

■CHI To present enough details of PP program relocation for 
the student to be able to follow some system routines 
which use the relocation techniques* 

SAMPLE PP PROGRAMS 

•Cl> To illustrate by example the usual methods of 
program structure* 

■C23- To illustrate by example the methods of PP programmer 
message transmission to dayfile* 

■C3> To illustrate by example error messages issued by 
system* 

■CH> To introduce the PP programmer to a PP dump* 

■iSy To introduce the PP program - 1RN- 
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PROBLEM GUIDE 



The assigned problems ares 

Problem 1 - due at end of second day 
Problem S - due at end of fourth day 

The problem statements may be found in Section XV- 

Please work these problems individually and test them during 
the Lab periods* 

There are optional problem statements for the ambitions 
students- 
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LANGUAGE ELEMENTS 
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PP COMPASS LANGUAGE ELEMENTS 
Lesson Guide 

REFERENCES: 

PP Compass Student Guide Section II 

TRAINING: 

Visuals VALS-53-5-3 thru VALS-53-3-7 

ASSIGNMENTS: 

Study Questions Section II 

OBJECTIVES: 

■CI* To describe the communication challenge between man 
and computer showing the difficulty of task. 

-C23- To preview the simplicity of PP Compass in meeting 
the communication challenge. 

■C3> Introduce PP Compass program structure* 

■CHI Use the various language elements to define major parts 
of a program- 
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PP COMPASS LANGUAGE ELEMENTS 
Lesson Outline 

II- LANGUAGE Elements 

A» The communications challenge 
o Cultural language 
o Compiler language 
o Assembler language 
o Machine language 

8- PP Compass Definition 

o Assembler 

o Comprehensive 

o For peripheral Processors 

C- PP Compass Simplicity 

o Uses Symbolic Notation 

o Is easily modified 

o One to one instruction coorelation 

B- Coding Formats 

o Program Limits definition 
o Program entry definition 
o Program exit procedure 
o Program documentation 

£• Setting up a PP Program {Using system routines} 
o For identification 
o For ease in coding 
o For pre defined functions 
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THE COnriUNICATION CHALLENGE 



VALS-53-5-3 
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VALS-S3-5-4 



PP COMPASS 



Assembler 
Comprehensive 
-Peripheral Processor 



Assembler 



Language Processor 
Generates binary object code 

Comprehensive 

Extensive language elements 

Control Data bOOO-. 7000n CYBER 70 and CYBER 170 machines 

PP or CP Code 

SCOPE or other Operating Systems 

Nodular Data Control 

PP {Peripheral Processor> 

bDOD-. CYBER 70 1 CYBER 170 PP 
7Q00-! CYBER 70-, CYBER 170 PPU 
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VALS-S3-2-5 



PP COflPASS Simplicity 



A = B + C LDD B 3010 

ADD C 3111 

STD A 3M12 



o Uses Symbolic notation 

o Relieves the programmer of housekeeping chores 

o Has one to one instruction code to machine code 
correlation 

o May provide documentation 

o Provides debugging aids 

o Is easily modified 
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* 



VALS-53-5-b 



11 


ia 


IDENT 


PGHi START 


PERIPH 




SST 




ORG 


START 



CODING FORMATS 

3t, 



**** This is a comments section to describe 

* the function of this PP program 



Written by John Doe-t 
Dec 25-, 1502 



START . Do housekeeping chores 

.- Get Input Data 



... Solve Problem 

LJfl R-IDLE Get Out 

END 
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SETT IMG UP THE P? PROGRAM 



VALS-S3-S-? 



pp coda 



gat systa 
symbols 




sat up 
Direct Calls 



coda 



\ 



rjh 



RJil 



rj^ocran p. a it a 
PGr,-, C.PPFtfA 



addrass to start 



C-PPrUA 
D.PPIRBnD.TG . 



used by R-RAFi 



pp Incut Register Suffer 
in the PP 



R.RAFL 



R.TAFL 



RAFL's and TAFL's 

as neaded to access 
O field 



LBN 
RJtl 



ft. DPP *- 



R.rtTR «■ 



R.IDLE i- 



,drop ma code 
go do it 
go to idle loop 



END 
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STUDY QUESTIONS 
LANGUAGE ELEMENTS-SECTION II 

1- Name four levels of man-machine communications languages* 

•Cl> 

*2> ; 

' -C3> , 

-C4> 



2« The PP Compass Assembler generates . . . code- 

3« Why do system programmers use PP Compass? 



H- A PP Compass program is identified as PP code by 



S« PP Compass is a 

■CaJ Machine language 

-CbJ Compiler language 

•Cc> High Level Language 

•£d> Assembler language 
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STUDY QUESTIONS 
LANGUAGE ELEMENTS-SECTION II 

Name four levels of man-machine communications languages* 



-C3> Asse>~, k>l<a.*~ 
■cm ArfacMt'n*- 



S- The PP Compass Assembler generates w J2Jl£j£, *i £S 1 g code* 

3- Why do system programmers use PP Compass? 

4- A PP Compass program is identified as PP code by r**«- 

5* PP Compass is a 

£a> ' Machine language 
-Cbl Compiler language 
■tcj^ High Level Language 
,/ idl / Assembler language 
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SYSTEM OVERVIEW 
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SYSTEM OVERVIEW 
Lesson Guide 

REFERENCES: 

PP Compass Student Guide Section III 

TRAINING AIDS! 

Visuals VALS-S3-3-3 thru VALS-S3-3-S-" VALS-S3-3-7 thru 
VALS-S3-3-3 
ASSIGNMENTS: 

Study questions Section III 

OBJECTIVES: 

■C1J To describe the basic job flow through the SCOPE system* 

■C23- To describe the "accounting" technique of control points- 

•C3> To introduce the storage locations used as exchange 
packages* 

-C43- To give students initial knowledge of entering PP 
programs into system using control cards- 

■£S> To describe the process of calling a PP program from 
a CP program- 
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SYSTEM OVERVIEW 
Lesson Outline 



III- SYSTEM OVERVIEW 



A» Basic Job Flow 

o dob deck thru JANUS to Input <2ueue 

o Input flueue to CM 

o CM to Output <2ueue 

o Output flueue thru JANUS to Printer 

B- Control Point Concept 

o An "accounting" technique 

o Field associated with a control point 

o Information relating to a control point 

o Relative addresses 

o Length of field 

o Order of control point 

C« Exchange Package 

o Definition - storage, locations 
o Method of exchange 
o Managed by Monitor 

]>• Example PP Coding Control Cards 

o Compiling a PP job 

o Entering code into system 

o Testing your PP code 

o Demonstrate calling CP program 

o Restoring system to condition before your PP 
code test- 

o Sample CP "calling program" 
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VALS-S3-3-3 



GKSVC O0^> TWfcW 



\MPUT fccCK 




"Disc* 
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VALS-S3-3-4 
CONTROL POINT CONCEPT 

A USER PROGRAM WILL BE ASSIGNED TO A CONTROL POINT 
IN CENTRAL MEMORY 

THE CONTROL POINT IS A FIELD WHICH 

. BEGINS AT A REFERENCE ADDRESS »RA» AND 

. IS OF A DEFINED LENGTH (IN WORDS) »FL» 

ALL ADDRESSES IN THE USER'S FIELD ARE RELATIVE TO RA 



Absolute 
Memory Address 
Used by Hardware 

. v — * RA+O 
RA+1 



RA+n 



RA+FL 




Address in User's Field 
Address 1 in. User's Field. 



Address a in User's Field 



Last Location, in. 
User's Field 
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VALS-S3-3-S 
EXCHANGE PACKAGE 



Iprograrn Address-CP> • \ ACKAddress Registers} j 80 



word 



iererence 



Address-CRA} j Al 



Bl-CIncrement Registers} 



Field Length-CFL} 



A2 



82 



Ltx.ic nade-C£f1> 



I 



A3 



J53 



RX - ECS 



A^ 



BM 



FL - ECS 



AS 



BS 



Jilrr. Exc hange Addre ss] At» 

*- 



Bh 



I A7 



B7 



XO-C Operand Registers* 



XI 



X2 



X3 



XH 



XS 



XL 



X? 



SAMPLE EXCHANGE PACKAGE DUMP 



DMPX. 



p 


000000 AO 


050000 BO 


oooooo 


RA 


06-1600 Al 


00010O 81 


oooooi 


FL 


050000 A2 


000066 B2 


047777 


EH 


070000 A3 


044006 B3 


047777 


RE 


000000 A4 


042471 B4 


oooooo 


FE 


000000 A5 


043465 B5 


043^76 


MA 


002070 A6 


000001 B6 


042472 




A 7- 


047777 B7 


oooioi 


XO 


4000 0000 


0000 0000 


oooo 


XI 


4000 0000 


0000 0000 


0000 


X2 


4000 0000 


0000 0000 


oooo 


X3 


7776 0000 


0000 0000 


oooo 


X4 


0000 0000 


0000 0000 


1000 


X5 


7777 7777 


7777 7777 


7000 


X6 


0002 0000 


0000 0000 


oooo 


X7 


0000 0000 


0O00 0000 


0004 
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PP Coding Control Cards 

The following deck is an example method of: 

If Compiling your PP COUP ASS job 

3« flaking your PP Code part of the system 

3. Testing your PP Code {using a CP COMPASS calling program* 

H. Restoring the system to the condition before your PP 
Code was added* 
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VALS-53-3-7 

Y0URJ0B-.T1QQ. 

COMPASS -CB= CPBINi S = SCPTEXT* 

COMPASS -C B = PPBINi S = SCPTEXT> 

REWIND -CPPBIN3- 

EDITLIB -CSYSTEMD- 

LOAD -CCPBIN} 

EXECUTE -CTEST> 

DMP- 

DMP -ClDDn4DD} 

EDITLIB {SYSTEM -.RESTORE* 

EXIT- 

DMP -ClODtHOD} 

EDITLIB {SYSTEM-. RESTORE* 

J* EOR Place your CP program after This card 

J* EOR Place your PP code after this card 

J 1 EOR EDITLIB Directives after this card 

READY -C SYSTEM-. OLD* 

ADD {*•« PPBIN* 

COMPLETE- 

ENDRUN- 

J 1 EOR 

* EOF 
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SETTING UP THE CALLING CPPROGRAH 



IDENT 
ENTRY 



TEST 



cade 



CPPGfl 
TEST 



UT 



SA1 


CALL 


BXb 


XI 


SAb 


1 


SAL 


1 


•NZ 


XItUT 



1 



code 



I 



CALL 



END RUN 
VFD 



PARAfl 



BSSZ 



END 



put call in RA+I 



wait till picked up 
by HTR 



HI 

I 



pp program name 

recall bit if desired 

2M/4LPGftPi3b/PARAn 

address in CJ1 for 
pp program to 
find parameters or 
set complete bit 



PARAn in this case is a 
face FET in which the PP ocm 
can set the complete bit to 
bring the CP out of recall. 

It may be any group of words ■■» 
such as a FET for I/O 

TEST _ 
3-fi 



STUDY QUESTIONS 
SYSTEM OVERVIEW - SECTION III 

!• Before a job is executed by SCOPE it is first placed 



2- A control Point is 

■Ca> a hardware concept 
-Cb> a software program 
■Ccl an accounting technique 
■Cd> system entry point 

3« The users field length begins at 

"■4- The users field length ends at _. 

S- EDITLIB is a system routine to — 



b- PP Programs are usually set into execution by 



What is RECALL? 



3-T 



STUDY QUESTIONS 
SYSTEM OVERVIEW - SECTION III 

1- Before a job is executed by SCOPE it is first placed Of* 

J; s k _. 

2- A control Point is 

<a> a hardware concept 

CbJ a software program 

(£c$) an accounting technique 

Cd> system entry point 

3- The users field length begins at ; ■ /cA ^. . . , 

4- The users field length ends at M/l T* rL> 

5- EDITLI8 is a system routine to m » J'"TU r4*- *r*fJT»+T 
b- PP Programs ars usually set into execution by &$ ''■f- / 

e*tl . 

7- What is RECALL? , 

f' 



umj) bt-md. 
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HARDWARE OVERVIEW 
Lesson Guide 



REFERENCES: 

PP Compass Student Guide Section IV 

TRAINING AIDS: 

Visuals VALS-53-4-4 thru VALS-S3-4-^ 

ASSIGNMENTS: 

Study Questions Section IV 

OBJECTIVES: 

■C13- To present an overview of the CYBER systems unique 

hardware- 
is} To introduce the programable hardware features of the PP> 
<3> To present the PP memory allocation concepts- 
C4J To present the additional system hardware features- 
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HARDWARE OVERVIEW 
Lesson Outline 



IV- Hardware Overview 



Conceptional relationships 

o I/O devices fixed to one or more channels' 

o bi-directional channels 

o Freedom of pool PP's 

o Monitor in PPO 

o DSD in PPl 

o Any PP may access all channels 

o PP to PP communication over any channel 

o I/O thru PP to central Memory 

o I/O thru CM to ECS 

o I/O thru PP to ECS via DDP 

o Expandability of channels 

o Expandability of PPs 

Barrel and Slot 

o Time shared instruction control 

o PP hardware register overview 

o Read pyramid 

o Write pyramid 

o Channel access 

Registers 

o A-Arithmetic 

o p-Program 

o (2-Holding 

o K-Op code + trip count 

o Internal Arithmetic 

PP Memory 

o Direct Cells 

o User Memory 

Additional Hardware 

o CEJ/MEJ Central Exchange Jum 
o CMM Compare Hove Unit 

o DDP Distribute Data Path 

4-2 



o ILR Interlock Register 

o CflAP Central Memory Access Priority 
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VALS-53-M-M 



— -- i .1..1 i r. 

1 Cs>trriiivn 










j Commit, i 
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CENTRAL. 
MEMORY 
(60) 



VALS-53-9-S 



10 MEMORIES, 4096 WORDS EACH.J2-BIT 




A A 





■**** 




READ 








*■"• 








o 


lr - a 






2 














*•) 




— ! 



(12) 



(12) 



(12) 



WRITE 










PYRAMID 












o 






O 


<a 








»r- 








U» 










«r 


rt 








^m 


f4 










<V 


•^ 
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CENTRAL 
"MEMORY 
(60) 



-REAL-TIME 



3«5 



!0 



12 



13 



!4 



I/O CHANNELS 



[(12) 
V 

EXTERNAL EQUIPMENT 



Peripheral and Control Processors 
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K 



VALS-S3-4-b_ 

REGISTERS 



18 BITS 

'. main arithmetic register (also adder) 

NO SIGN EXIEXSION 

UPPIR BITS ARE ZERO WHEN PP 12-BIT OR 6-BIT QUANTITIES 

ARE PUT THERE 

. ALSO USED IN SOME I/O 
-AND SHIFT, LOGICAL, INSTRUCTIONS 

. HOLI'S 18-BIT CM ADDRESSES (ABSOLUTE) FOR CENTRAL I/O 



12 BITS 
. HOLDS ADDRESS OF CURRENT INSTRUCTION 

. ALSO USED IN I/O 

(TO HOLD DATA ADDRESS OF WHERE IN THE PP 
DATA IS GOING TO OR FROM) 



12 HITS - HOLDING REGISTER 

„ HOLDS ADDRESS 

. DELTA OF A 12-BIT INSTRUCTION 

. ADDRESS FROM DELTA FOR INDIRECT ADDRESSING 

. HOLDS DELTA OF OTHER INSTRUCTIONS 

. ALSO AN ADDER (ADDS +1 or -1 TO ITSELF) 

9 BITS 

• OP CODS - UPPER 6 BITS 

. TRI P COUNT - LOWER 3 BITS 

(WHICH TRIP THE INSTRUCTION IS ON, AROUND THE BARREL. 

OTHER REGISTERS: 

. I/O CHANNEL REGISTERS 

. READ/WRITE PYRAMID REGISTERS 

* ONLY THE A REGISTER IS PROGRAMMABLE * 



VALS-53-4-? 
ADDER 

. BOTH OPERANDS ARE COMPLEMENTED GOING INTO THE ADDER 

. THE ANSWER IS RECOilPLEMENTED COMING OUT 



ie ADD 3+4 

original 
number 



0003 
+0004 



complemented 
numbers 



-> 7774 

■» +7773 

?7b7 

* 1 



recomplemented 
answer 



^ 0007 



ie SUBTRACT 3-4 



0003 
-0004 



7774 
-7773 



To subtract n 
complement 
and add 



7774 

-*+oao4 




-$► 777b 



ie ADD +3 and -3 



0003 
+7774 



-* 7774 
7777 



■» 0000 



\ 



Mote a +0 is \ 

returned by,- the adder 
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VALS-53-M-fl 



p.p ms^o^y 



ceoo 







4-fi 



VALS-SB-if-T 



Hardware Features 
{New Options} 



o CEJ/HEJ Central Exchange Jump 

Hon it or Exchange Jump 



o CHH Compare Hove Unit 

o DDP Distributive Data Path 

o ILR Interlock Register 

o CHAP Central Hemory Access Priorty 



Note: These hardware features am discussed further in 
Appendix A- 
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CYBER 73 HARDWARE' FEATURES Wat makes them different from VTTT'sfr 

Contents 

Topic Pa<?g 

Introduction 1 

CEJ/fCJ {Central, and: ftonitor- Exchange Juap} 1 

Background Review 1 

CEJ/.IEJ {Discussion} 1 

Exchange Instruction Differences {Table 1> 3 

Other Exchange Juaip 4 

CnOCConpare Wove Unite* 5 

Indirect move {IIT> t» ' 

; /i'.Bxrecte' ftove- {Dfty~ ; ; & 

GeuBparm Collated {CO- S 

Compare Uncaliateesd- IT 

Distributive bm£*.9*tte-<XS9¥- IX 

^nilosaphy 11 

■■-, .^S5P s ' r -p-rnjgr'a«wing?----;i:' 12 

l£ Function Flag» Register* -CFFRJ IS 

HJ^Clnteriock Register} IS 

. ; 'Introduction -■-. . : -V;\\ "'-. ^ - 

--'.operation - """ ' !*■ 

Ol^iCjenteral rtes^r^^ccass- Prioriteyy 21 

-•-Effect:- on ECX : Tra«sfer"'-. ;: v 21 

"; FIf f ecfr on PFU Read/Brites 21 

^Effect on SCBpfe- 3-4- -.■-"- 21 
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CYBER 7D HARDWARE FEATURES 



INTRODUCTION 



The CDC CYBER 70 series computers have several new hardware features 
which were not available or optional on the b GOO. series machines •- 
Among- these new features are the Central Exchange Jump/flam tor 
Exchange Jump -CCEJ/ftE-J> capabi li ty-. the Compare/ftove Unit; -CCrtU>-r 
the Distributive Data Path -CDDP>v and the Interlock Register. All 
these hardware- features ar^ supported by the SCOPE 3.^ Operating 
System-* and a thorough knowledge of their concepts, is essential .for 
full utilization of the CYBER series computers; and their assacia ted 
; software*- -.- 

i This^ chapter is intended as an introduction to these hardware features: 

i,awefc1±flfe-r.sorfiarfare--ins^ use thera:~ 

- central, exchange Jmm/rtowrroft exchange jukp ccEJ/rrEJ> 

: BACKSROUNfr REVIEW - ".-.":"- 

In most: bOQG systems operated under SCOPE 3.3 or older* Monitor* runs- 
in as dedicated PPCPPO}-- A job accesses or^ relinquishes the Central 
.Processor each time Monitor issues- an exchange jump instruction 

-:=-CEXNi:^ This is done when a job has used the Central Processor for 
^•tfcev: maximum interval allowed by SCOPE-.; Each -time the EX» instruction 
■;-iS£ executed ■» any jobr using the--- Central: -Processor is intserrupted and : 
: thesSjbb with the next, highest priori ty-- ; has. access:- to? the- Central 
; Processor* Uh^n an active job is interrupted*- all pertinent: informa— 
. ti on*- about the job- .{register contents--* ftA-r.-FL.r- etc* sirm. saved- in 
'a;:ifcword exchange package where they can be picked up later for 
execution again by another EXN instruction- issued by ftonitor^ 

CE'jyrro ; "■ '■'-."".' 

;- ; ' Ihr- the- CY8ERT series- camp&teirv- however^-- e new*- type of . exchange- jump 
is available with the CE*l/ftE«J. hardware' and the SCOPE 3-H Opereting: 

■:■' system...- - In the CYBEft" series. machine* - the Cen tra-1 P roce ssor has* in . ■ 
the Central (Ternary control sections .. a- Monitor moder flag. bit* - The 
flag- : is cleared, Jay- Seadstart* ■ -Thereafter^- it can- 'be set' or cleared .' 
only by the Monitor exchange jump {MXN> or the- ctntral exchange jump 
■CXJ> instructions supplied by SCOPE 1^, There is no instruction 

- with which to test the status of this flag directly or independently - 

iile can now distinguish: two types of Central Processor operations- 
The CPU executes in either Worn" tor Mode or User Mode depending on 
whether this Monitor Wade flag is set or clear. All user programs-. 
as well as many system programs « run in User node' The only programs 
that do run in Monitor (lode are CP Monitar-t SPM-» and CP CIO ► Programs 
running in User ftode can be interrupted at any time -r either because 
the CPU is needed by a floni tor ftode progra'm .or upon the expiration 
of the time slice- In Monitor Mode-* however-* the CPU' is not Mnterrup-"" 
table and is permitted to execute until a task has been completed- 

CONTROL OATA CORPORATION* . 

INTERNAL DOCUMENT AT ION. 
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To utilize fully the CEJ/HEJ hardware and to provide Monitor with 
a processor more oouerful than a PPU* the Monitor in SCOPE 3.4 is 
divided into two seoarate Darts-, a CP Monitor and a PP Monitor-. 
with each performing different functions- CP Monitor-, which resides 
in Central Memory Resident-, controls CPU flonitor Mode execution and 
CPU scheduling- PP Monitor-, which is in general control of the 
system-r operates in PPO. -CFor details-, .please ref^r to the chapter 
on flan i tor •> 

tsihen. a User Mode program has used up its time slice-* or when a PP -Ce*g*-> 
PP Monitor or other PP routine* needs the CP Monitor to perform- a cer— ■ 
tain- task it initiates an MXM exchange jump instruction. This will 
activate the 'CP Monitor immediately if the Central Processor is 
running in User Mode- The job that was running is farced to relin- 
quish the CPU to CP Monitor. At the- same time the Monitor Mode .tag 
is set putting the CPU in Monitor Mode execution. If-, however-, the 
CPU is- already in Monitor Mode when MXN is initiated by a PP^ it 
will be ignored and treated as a PASS instruction- The CPU is 
allowed to execute without interruption until a task is completed* 

The Central Exchange Jump instruction {XJ} is used in conjunction 
with: nXN- as mentioned be fore t the CPU is not interruptable while 
in Monitor Mode. Hence-, the Monitor Mode program must exit itself* 
When a task is completed-, the Monitor Mode program initiates an XJ 
exchange jump. This will release the Central Processor to a User 
Mode' job and at the same time clear the Monitor Mode flag returning 
-the computer to normal program mode execution* When a User Mode CP 
progrant needs the CP Monitor-, it too can initiate an XJ* This will 
activate the CP Moni cor immediately -Cas in the case of the MXM for 
a PP program* and put the computer in Monitor Mode- Hence-, the mode 
of- execution of the Central Processor changes every time upon the 
completion of the XJ exchange jump* 

The CgJ/Mg «l hardware operation is enabled or disabled by a control 
switch on the deadstart panel* If it is enabled* the CEJ/MEJ feature 
will operate as above- However-, if it is disabled or in an installa— - 
ti on without the MXN/XJ instruction sett the EXN instruction is used* 

. This is a PP- initiated exchange jump which occurs independently of 
the mode of the CPU and has no effect on the Monitor Mocte* J=£» 
Monitor is the only orocram that may perfenrr an EXN* In fact:-. 'it 

. simulates the MXN for all PPs in the system and also simulates X J 
for the Central Processor as SCOPE 3-3* " 

SCOPE 3-4 requires either the combination of MXN/XJ or EXH to run- 

The different exchange jumps are summarized below* 

* NAME INSTRUCTION CODE 



PPU Regular Exchange Jump - EXN 
PPU Monitor Exchange Jump * MXN 

CPU Central Exchange Jump - XJ 
CONTROL DATA CORPORATION, 
INTERNAL DOCUMENTATION. 



2t,Dd 
2 bid 
0l3jk 
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Table 1 summarizes the operational differences between the Normal 
exchange jump instruction -C2kQ> and the Monitor and Central Exchangs 
jumps C2bi and Qi»3>. • 



EXCHANGE INSTRUCTION DIFFERENCES: 



INSTRUCTION 



2 tO C Normal 
Peripheral Pro- 
cessor- Exchange' 
Jumpy 

2tL. C Peripheral 
Processor- floni — 
tor Exchange 
Jumpy 



013 CCentral 
Exchange Jumpy 
with floni tor 
Flag- bit clear 

013 CCentral 
Exchange Jumpy 
witt* flonitor 
Flag bit. 

set. 



CONDITIONAL/ 
UNCONDITIONAL 



Uncondi tibnal 



Conditional 
{occurs: only iF 
floni tor Flag 
bit is clears 
passes if flag 
is set} 

Uncondi Clonal 



Unconditional 



P ERA TI ONAL. DIFFERENCES 



Effect on 
flonitor- Flag 
Bit 



No effect on 
Flag 



Sets; Flag 



Sets Flag: 



Clears Flag 



Location of 
Starting 
Address of 
...Exchange-. 



Peripheral Pro- 
cessor- . A Regi see*""-. 



Perlpherel Pro—- -'-' 
ces-sor*' A Register* 



Central - P r ocess — 
or floni tor Address 
Register- 



Address formed 
by JC-KS j> 



TABLE I 



CONTRGL DATA CORPORATION* 
INTERNAL DOCUMENTATION. 
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Their instruction formats are as follows: 



OPERATION 


VARIABLE 


DESCRIPTION 


SIZE 


OCTAL CODE ] 


EXN 


d 


Exchange jump tp CPU d 


12 bits 


atad 


nxN 


d 


Hon i tor exchange jump 
CPU d to -CAJ 


12 bits 


2kld 


HAN 


d 


Monitor exchange jump 
CPU d to cnA> 


12 bits 


2b2d 


XJ 




Exchange jump to HA if 
in Program node 


3d bits 


Qi3oo aoaoa 


XJ 


Bj 


Exchange jump to -C8j>i 


30 bits 


ai.3jo oaoaa 






flag set 






XJ 


K 


Exchange jump ta Ki 
flag set 


30 bits 


Q130K 


XJ 


BJ+K 


Exchange jump to -CBJ-HC, 
flag set 


30 bits 


Q13jK 



In 1.500 or 1,700 systems -Car CYBER ?Q/nodel 72-22 -, 73-22 , or 74-223- 
with dual Central Processors-, d can be or J, and specifies which 
CPU the- exchange jump will interrupt. In single processor systems, 
this value is not interpreted*. 

Please also note that the assembler forces upper before and af-ter 
assembling an XJ instruction. 

O THER EXCHANGE JUMP 

Besides* the HXN/XJ and EXN exchange jump-, two other exchamje iunta 
instructions are available- ^^^ 

1* HAN 

The ftAH exchange jump i octal code SkSy is a PPU instruction 
that executes just like the flXN. However, the exchange package 
address is taken from the la bit Hon i tor Address -CPU} Register 
in the CPU. rather than the A register of a PP. Uhich instruc- 

t l°'7-, 1S - Set t0 USe tpIXN/x J °r rtAN/XJ> is determined by an in- 
- sta nation parameter IIP .xj>. 

2. Program Stop /Error Exit Operation 

Qn e th7rr^ M r' 1 ; OP in f truction p $ could execute an exchange jump 
on the CEJ/HEJ panel switch. j«-"»h 

•The DISABLE position disables the Central exchange junto or the 
rtomtor exchange jump. In this case,. PS halts the Cental Pro- 
Vll° r unit aC thG current step in the- program. An exchange 
jump is necessary to restart the Central Processor unit. The 



CONTJWt 0ATA CORPORATION. 
INTERNAL OQCUHCNfAriQN, 
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ENA8LE position enables the jump, capabilities* In this case <• 
PS causes an exchange jump to monitor address -CPTA> in the ex- 
change package. 

The contents of the location field become a sub-subtitle on 
the assembler listing. The assembler forces upper* before and 
after assembling a PS instruction^ 

Instruction Format* 



OPERATION 



PS 
PS 



VARIABLE 



DESCRIPTION 



Program" stop or exchange 

jump to* CMA> — 

Program stop or exchange 
jump to <f1A> 



SIZE 



30 bits: 
30 bits 



0CT41 ro g& 



00000. 00000 
0QQ0K 



Its opera ti or* Is summarized as: follows- -CCEJ/MEU enabled** 



Monitor Flag Clear 



Monitor Flag Set 



Store P+l at RA 
Clear P 

Exchange .Jump to CMA> 
Set Monitor Flag 

Store P+3* at RA 

Clear- P 

Stop CPU 

Monitor Flag Remains Set 



Program errors can also cause an Exchange Jump tor happen. 
Hardware action during an attempted execution of" art illegal 
instruction will effect the following -CCE'J/MEJ switclt enabl 



ed>: 



Monitor^ Flag Clear* 



Monitor Flag Set 



COMPARE MOVE UNIT -CCMU> 



Store- P^i at RA 
Clear" P 

Exchanger Jump to -CMA} 
Set Monitor- Flag 

Store P+V mt:. : RA 
Clear- P 
Stop the CPU 



The Compare Hov'e Unit is a standard CPU hardware component of the 
CYSER 70 series. Model 72 and 73 and optional on the Model 7t» computer 
system. It provides the capability to move and compare data fields 
in storage without having to use the registers. 



CONTROL DATA G0RP0SATI0N, 
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There are ten b-bit character positions in each bO-bit word. These 
positions are numbered through 1 from left to right respectively. 
The 4-bit character addresses of these positions are Cin binary> 

0000 1 0001 -. 1 1000-. and 1001 . Character addresses 1010 through 

1111 are illegal and cause the instructions to give an address out 
of range condition. 



5T 



STORAGE WORD 



Data fields may span word boundaries and may start or end at any 
position in a Is Q -bit word- 
Example - 



S0Q0O 

SQ0Q1 
S0Q02 



FZZZZZZ3 



? characters 



10 characters 



b characters 



U//////A 



The field above starts at character 3 in word 50000 and ends with 
character S in word 50002- The field has a length of 23j.q characters- 
One limitation for using the CflU is that the data field must not be 
in an operating register or in ECS./LCTT. 

COMPASS 3.Q provides symbolic forms of four CflU instructions. They 

arm* ■ 

1. "Indirect Hove - lit 

2- Direct flove - DM 

3- Compare Collated - CC 
4. Compare Unco 11a ted - CU 

Of the abover only the Indirect flove <If!> instruction has the same 
type of syntax and semantics as other- CPU instructions. The others 
aris treated as pseudo instructions by COMPASS- 

INDIRECT MOVE <irt> 



This is a 30-bit instruction that moves the content of a data field 
to another data .field according to a descriptor word* Maximum length 
of the data field that could be moved by this instruction is filling 
characters- The descriptor word contains the length and addresses of 
the data fields. COMPASS forces the instruction to the upper left 
of a word because it is executed as a pass by the hardware if it is 
not the first instruction at a word* the next instruction is also 
forced upper in the next: word-, because the lower half of a word 
containing an indirect move is not executed. 



CONTROL DATA CORPORATION, 
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Format: 



oprpAT.rn" 


'.'.• ?Ti3! ?" 


D-SC3TPTTO"! 


^rjr 


OCTM .roror 


in 

irr 
in 


8j 
8ji< 


tlove per descriptor at 

Ptove per descriptor at X 
flove per descriptor at 
Bj±IC 


30 bits 

3Q bits 
3Q bits 


HfcHjQflQOOfl 

HbHUK 
4b<4jK 



Execution: The descriptor wordt is fetched from storage location 
i8j>±K* If the data field length is zero* the instruction is executed. 
as a pass but the execution time is longer. Otherwise* the- content 
of the source field is moved to the destination field- If the two 
fields overlap ■• the results are undefined. The XQ register is used 
for intermediate storage during execution of the instruction and is 
cleared upon completion, of the instruction. 



A pseudo instruction tlD is used to generate a descriptor word, for 
use by the indirect move instruction. The HD. instruction has the 
following format* 



LOCATION i ■ Of*€RAfi'l'Q>l i 


VARIABLE 


locsy tit 


tt& 


Lt^lC^-r C§* K|Jt Cq; 



L is the absolute a^kir^ss -expression* its value* in the 1 range 
QCL^ailJ*-* is the data field length- in characters* The upper I bits" 
are- placed in bits 5&~H«4 of the descriptor word while the lower ^ 
bits are placed in bits 51-21*. 

K s is any expression* the first word .address of the source field. 

C s is the absolute expression* the starting character position of the 
source field within the word at location K s . 

KjB is any expression* the first ward address of the destination 

field. • , •. '".'..■ 

Cp is the absolute expression-, the starting character position of 
the destination field within the word at location Kj>. 



Indirect Hove Descriptor Uord format: 



17 



n 



Q 



u 



"L 



D 
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Where: 



L u : Upper 1 bits of value of L. 
L^: Lower M bits of value of L- 
DIRECT HOVE <DPT> 

— m i.— , m iwi i n ii ■ i nn mum — ■i nn !■■ — i .i 11 ) 1 1 i ii-i i n .iaii mi l i n. . i ■ 

The direct move pseudo instruction generates a CHU instruction that 
moves a data field in storage to another location in storage. This 
instruction differs from the indirect move in several ways. It is 
a fe»Q-bit instruction that cannot be split between words and the 
descriptor word is part of the instruction. Furthermore -i the length 
of the data field it can move is limited to a maximum of 12?iq 
characters. 

Instruction Formats 



Location ,t operation * variable' 

—■——»■—■ II III — —.»«—!—»—.— 



locsym 



Sfl 



Li Kgv Cs y K^-> Cb 



51 



50 



47 



31 



25 



31 



17 



MbS 



•u 



L is the absolute address expression^ its value-t in the range 
Q^L^127-! is the data field length in characters. 

L u is the upper 3 bits of the value of L. 

L^i K s i C s i Kjj-i Cg! S&me as in the 115 instruction. 

Execution: Same as I IT* except that the descriptor is in the. instruc- 
tion word itself. 

COHPARE- COLLATES ICO 

■ II H i W H i W Il i l - m i , Ml IIi..Mi . I*iWi^- i . » » , ....i.IiIii..i|.i HU Ji ' ' f ill I I ' ll . | -■ - i ftH i ) ■ 

The compare collated instruction compares the contents of two data 
fields i- one character at a time-i from left to right-, until a pair 
of corresponding characters are found to ha^e unequal collating 
values-i or until the data fields are exhausted. It is a feQ-bit 
instruction that occupies one full word. -C it cannot be split between 
two words > and contains its own data field descriptor. 
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It uses register AQ to contain the first word address of a table in 
storage that contains the collating values to Be used in comparing 
characters. The result of the comparison is placed in register XQ- 

Format' 



LOCATION 


0?E3A"I0?; 


VARIABLE 


locasym 


CC 


Li K^ •» C^ "» ^8"* Cg 



ST 



so 



4? 



21 



as 



ai 



17 



Hbk 



<J 



'B 



Lr L u -» Ll ^r^ same as in the DM instruction. 

Ka is any expression -r the first word address of the first data field- 
er is the absolute expression! the starting character position of 
the -first data field within the word at location < A • 

Ka is any expression! the first word address of the second data. 
field. 

Cg is the absolute expression -» the starting character position of 
the second data, field within the word at location Kg- 

Execution^ The first word address of the collating table is obtained 
front register AQ* The contents of the data fields are compared from 
;ieft to rights one character at a time from each fie Id ■» until two 
unequal characters are found. The collating value of each character 
is obtained from the collating table. If these values are equal ■>■ 
the compare continues until another character pair is unequal or until 
all characters have been compared. If the collating values are un- 
equal* the two data fields are unequal and the field with a larger 
collating value is the greater of the two fields* The collating 
values are treated as fa -bit unsigned integers- 

Note that two unequal characters could have the same collating value 
and would compare equa 1 . Uporr completion t register XO contains a 
tsQ-bit signed integer as fallows* 

XO * L - N>0 if field A > field B 

XQ = +0 " if field A - field B 
. XO = N - L40 if field A < field 8 

where M is the number of pairs of characrers that compared equal. - 
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f L-0- then XQ=*Q. 
The format of the collating table is as follows: 

Vao> 



-CA0> 
+1 



,-CAO} 
+7 



ST 


S3 


m 


41 


35 


2=1 


23 


17 


Li 





QD 


01 


02 


03 


04 


OS 


Ob 


07 




10 


11 


12 


13 

: 


14 


IS 


lb 


17 










' ■ 












70 


71 


72 


73 


74 


75 


7b 


77 


• 



COfiPARC UNCOLLATEP -CCU> 

**Tbe compare unc'ollated instruction compares the contents of two data 
[ ieldsi one character at a. time-, from left to right-t until a pair 
of corresponding characters arB found to have unequal values-, or 
until the data fields ars exhausted. It* is a bG-bit instruction that 
occupies one full word -Cit cannox be split between two wordsl and 
contains its own data field descriptor. The result of the comparison 
is placed in register XO^ 

Format? 



LOCATION 1 OPERATION i VA3IA3LE 


loeasym 


CU 


Li Ka-» Ca-* KB-r Cs 



ST 



so 



47 



4b7 



2T 35 21 J.7 
i k I C A I C 3 1 







'B 



Execution: Same as the CC instruction except that AQ and the collat- 
ing table are not used. Instead v the characters are compared. directly 
with each character. regarded as a b-bit unsigned binary integer. 
Register XQ is set in the same manner as by the CC instruction. 
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DISTRIBUTIVE DATA PATH - DPP 
PHILOSOPHY 

The Distributive Data Path is a new hardware feature designed to 
increase the performance and throughput of systems equipped with 
Extended Core Storage -C ECS >• If DDP is not available-i data transfers 
between ECS and peripheral equipment must pass through central memory 
using a system double buffer, tror a description of ECS I/O buffer- 
ing please see the chapter on ECS Extensions *> The Distributive' 
Data Path provides a data path between a PPU and ECS-. allowing direct 
PPU to/from ECS data transfers- The DDP utilizes one access of an 
ECS controller to communicate with ECS. A PPU in turn- communicates 
with the DDP via I/O data channels— Data, is transferred across 
this channel in 12-bit bytes at a maximum rate of up to one million 
bytes per second 

The DDP is expandable from one to a maximum of four identical PPU 
data channel interfaces. Each of these PPu interfaces-, called ports-. 
operated independently while sharing a common ECS interface- The 
first interface is part of the DDP. The seconds third* and fourth 
interfaces are the optional DDPRI's. These interfaces eacn contain 
a buffer which is used to assemble 12-bit byres into an ECS record 
or to disassemble an ECS record- when H&Q bits of the buffer are 
available-, a request for ECS transfer is made. An equal-priority 
scanner monitors the four Port-ECS-Request signals and connects a 
requesting port to the ECS Controller interface for an ECS transfer. 
At the completion of one ECS Record transfer, the scanner moves on 
to check for a request from the next port- 

It takes at least MO. microseconds, to transfer a 4aa-bit ECS record 
between a PPU and a DDP port. The DDP port has buffering to allow 
the data channel to maintain its one mega-byte per second transfer 
rate while data is. being transferred between the port and ECS-i if 
no more than two devices are actively accessing ECS. For example t 
two DDP ports can maintain a one mega-byte rate if nothing else i<- 
accessing ECS"' one DDP port can maintain a one mega-byte rate if no 
more than one other ECS control ler access is busy-, such as-, if the"' 
CPU is accessing ECS- 

Restrictions on the DDP port are that it must be either the first 
or the second device out of a data channel to maintain a one HHZ 
transfer rate and it must be the -last device on a data channel. 
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DDP PROGRAMING 
FUNCTION CODES 



The DDP is controlled via functions from the PPU I/O channel. 
Function codes are sent to the DDP PPU port with the upper three 
bits containing the equipment select code .. <S>-» and the remaining 
bits designating the function to be performed. Functions are sent 
out on an inactive channel by the PPU and the DDP responds to valid 
functions by disconnecting the data channel. The function codes 
used to control a DDP port are: 



SQQ1 - ECS Read 
5Q02 - ECS Write 
SOQM - Status 
5G1Q - Clear Port 

All other function codes ar^ either illegal or ignored by the DDP. 
The DDP will respond to all function codes with the correct equipment 
.select code and the remainder of the upper eight bits equal to zero. 
The remaining four bits of the function code must have only one bit 
set to select the required function, flare than one bit set is illegal 
and the results, of such a condition are undefined. 

SDOL - ECS READ 

This function causes the DDP port to read, data from ECS and to pre- 
sent this data to the I/O channel for input to the PPU. The DDP 
responds to this function by disconnecting the data channel. When 
the channel is activated by the PPU -» the DDP requires an output of 
two 12 -bit bytes from the channel. These bytes are loaded into the 
dH-bit; address register-, with the first byte going into the upper 
twelve bits of the register and the second byte into the lower twelve 
bits.. The address register now designates the ECS address of the 
first fe»0 -bit word to: be presented to the PPU. 

The ECS" read function has three selectable modes. 

A. The first mode is r^fer^^d to as Slock Read rtode. In this mode 
a new request to ECS is made whenever a sufficient amount of 
buffer register space is available for a new ECS Record. The 
DDP increments the address register once for each tG-bit word 
it receives such that each subsequent request is made at the 
next higher ECS record address- The DDP will continue to make 
these requests until the data channel is made inactive. 

B- The second mode of operation is the Read 1 flode . In the read 1 
mode, a second ECS request is never made. The purpose of this 
mode is to eliminate the wasteful second request that would 
be made to ECS under a a lock Read when data from only one ECS 
record is needed. This mode is terminated when the data channel 
goes inactive. 
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C The third ECS Read mode does not cause data to be read from 
ECS. This mode is called Function Flag Register mode. When 
this mode is selected* the DDP sends the contents of the address 
register to ECS and terminates the ECS read condition within 
the DDP. The PPU must disconnect the data channel . This is 
the manner in which a flag register operation is performed- 

The selection of these modes of ECS Read is determined by. the two most, 

-significant bits {2 23 and S 22 } of the res address given to the DDP at. 

the start of the ECS Read. Any time bit 2*-* is a »l»^ Function Flag 

Register mode is selected. If bit 2 23 is a *D* and 2 22 is a »l»i 

then Read 1 mode is selected. If both 2 23 and 2 22 aro. 9 Q i a Block Read 
is performed. 

Graphically* this is: 

5 23 2 55 node 

Q Block Read 

1 Read 1 

1 Function Flag Register 

11 Function Flag Register 

As stated in the descriptions of the three modes of an ECS Read? 
this; function- is terminated by the data channel going inactive- The 
channel can be disconnected by either- the PPU or the DDP. In the 
Block Read and Read 1 modes? two error conditions exist that will 
cause the DDP to disconnect the data channel. They ar&i 

ECS Abort , 
ECS: Parity Error 

If either of these two conditions is received from the ECS Controller 
in response to an ECS request for data? then the DDP will disconnect 
the data channel after the last byte of the previous ECS Record has 
been transferred to the PPU and when the data channel is in the Empty 
state- The disconnect signal, is sent out by the DDP- on an Empty 
channel rather than a Full and data. This is done to give the PPU 
the ability to determine whether the DDP is going to send a disconnect 
or not- If the channel is Full? the PPU can send a disconnect without 
risking a hang-up condition- If the channel is Empty? a PPU—generated 
disconnect is illegal on the basis that the DDP may disconnect. 

When the data channel is disconnected by the DDP-» the status word 
must be read to determine. the reason for the disconnect- In the case 
of Parity Error-,, the PPU may issue a Read 1 function in Maintenance 
{lode to input the data contained in the buffer register* The only 
way to read more data beyond that is to issue a new V ECS Read 4 * func- 
tion. Note that any ECS Read function must have an address sent to 
the DDP before data can be input by the PPU. 
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The issuance of a Read 1 in Maintenance node causes the data in the 
buffers to be presented to the data channel for input by the PPU 
without sending a request to ECS- Maintenance flode is selected by 
setting bit 221 of the address to a logical "1*. . 

The upper three bits of the Address Register provide these variations 
of the *ECS Read* function. 

j[23 222 2?1 Function 

ECS alock Read 

1 Block Read in flaintenance . flode 

10 ECS Raad I 

1 1 Read 1 in flaintenance Mode 

10 Function Flag Register - Ready Select 

1 1 Function Flag Register - Selective Set 

1 1 Function Flag Register -. Status 

111 Function Flag Register - Selective Clear 

These various modes are selected or deselected according to the most 
recent address sent to the DDP» - 

It can be seen from the above chart that when bit 2^3 is setn flain- 
tenance flode is not selected. 223 dictates a Flag Register operation 
and flaintenance Mode does not exist for a Flag Register operation. 

An instruction sequence to do an ECS Read is: 

FCN S0Q1 



.ACN 

0AM 
IAH 
NJN 

B * IJM 
EJfl 
DCN 

A XXX 



XXXX-. Where -CA} * 2 

XXXX-. Where <A> * 12-bit byte count 

trrort Channel disconnected via ])DP: Read Status 
-CSee para. 3.2.1.S«S> 



A 
B 



Wait for change from Active and 
Empty. State 
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The ECS Read condition within the DDP may be cleared out by a 
PPU disconnect-, a DDF disconnects a power-on Master Clear-, a dead- 
start flaster Clear-, or by a functioned port clear. 

FUNCTION FLAG REGISTER 

This function is performed any time bit 2^3 of the Address Register* 
is set when the address for an ECS Read is loaded into the DDP~ Ths 
Flag Register in the ECS Controller cannot be read directly but may 
be interrogated and/or written into. 

Interrogation is accomplished by selecting and reading, status from 
the DDP after* the Function Flag Register operation has been performed. 
The status word shows whether an Abort or an Accept has been received 
from the ECS Controller in response to the Flag Register word- 
Four Flag Register operations may be performed with the three most 
significant bits of the Address Register CN> determining which 
operation is to be performed. 



The Flag Word Format isr 
2 23 2 21 B 2Q 



2 1B a 17 



2° 



N 


NOT USED 


FLAG WORD 



The possible operations arei 
N«M < Ready Select> 

i. ii.<iii'i«i wi iii<iiii i i|ii i .i ■ ii . ii ; i fn;nw iiii - | m. i m n m 0mmmmm* 

A bit by bit comparison is made in the ECS Controller of the lower 
eighteen bits of the Flag Register in the ECS Controller and the 
Flag ijl ord received from the DDP- If all' bits: set in the Flag Ward 
are clear in the Flag Register-, then the ECS Controller responds 
with an Accept to the DDP and enters the set Flag Word bits into the 
Flag Register. The clear bits in the Flag Word have no effect on the 
Flag Register. . 

If any of the bits set in the Flag Word are set in the Flag Register-, 
then the ECS Controller responds with an Abort and does not modify 
the Flag Register. 

Examples -r using only three bits-> aret 

Flag Register = 010 

Flag Word * 101 

Result: Accept and Flag Register « 111 

.Flag Register = 010 

Flag Uord - Oil 

Result: Abort and Flag Register ^'QIQ 



N=5 {Selective Set} 

Selectively sets bits in the Flag Register from bits set in the 
Flag Word- The only response is an Accept* 

N=b {Status} 

Same as Ready Select-, except that the contents of the Flag Register 
are not changed. {NOTE: This is a Flag Register Status and has 
nothing to do with DDP Status-, function code 5004.} 

N"7 {Selective Clear} 

Selectively clears bits in the Flag Register from hits set in the 
Flag Word. The only response is an Accept- 

5005 - ECS Write 

■ii mn i — iiw— -pm i n ■! ! ./ i . iii i ii i hi w i- ■■ m a i ii . i L iii»ii « ii n ii 

This function causes the DDP port to assemble bytes from the data 
channel and to write data in ECS- The DDP responds to an ECS Write 
function by disconnecting the data channel. Uhen the channel is 
activated by the PPUi the DDP will begin accepting data from the PPU> 
The first two 12-bit bytes received from the channel must be the 
address at which the first ECS Record is to be written- These bytes 
are loaded into the 24-bit Address Register. The bytes that come 
after the second byte ar^ regarded as data and sent to ECS« 

The first byte received by the DDP is put. into the upper twelve bits 
of the Address Register. The second byte is. put into the . lower half. 
The Address Register now designates the address of the first bO-bit 
word to be written into ECS- This address is presented to the ECS 
Controller along with a request signal after the buffer in the DDP 
is filled by the PPU or after a disconnect is received from the PPU- 
The Address Register is incremented as the buffer empties into ECS' 
Unless an error condition is encountered-, data will continue to be 
transmitted in this fashion-; A disconnect from the PPU will cause 
accumulated data to be written into ECSi and the ECS Write condition 
within the DDP to clear out. If the PPU disconnects the J>W with 
less than an integer multiple of bO-bit words assembled in the b$P 
buffer registers-, then the partial bQ-bit word will be written into 
ECS with zeros in the missing byte{s}» 

A program sequence such as the following will produce a partial ECS 
Write with zero fill. 



FNC 


ECS Write 


ACN 




LDC 


2°ia . 


oArr 
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Only one error condition is possible on ECS Write* If the ECS 
Controller returns an Abort signal to the PDPi the ])DP will dis- 
connect the I/O channel. This disconnect will be sent to the I/O 
channel in the' place of an Empty response to a Full signal from the 
data channel. This will eliminate the possibility of hanging the 
channel when the PPU performs a disconnect. However^ if an Abort 
comes after the PPU disconnects the channel •» the only way to detect 
.it. is to do a status check after the disconnect-* waiting for the Write 
status to drop. 

An instruction sequence to do an ECS Write is: 

FNC SDD2 ' ECS Urite 

OAfl XXXX Where -CA>=5 + the number of 12-bit bytes of 

data to be sent {first 2 words are address> 

NJN Error: Channel disconnected via DBP: Read Status 

DCN Keeping in mind that the channel must be Empty. 

FCN Read Status: Check for Abort or Accept: continue to- 
read status until one or the other is detected -Cmay 
take as long as SO microseconds}. 

5004 - Select Status 

This function makes the status of a port'available for PPU input 
after the channel is activated by the PPU* The DDP responds to this 
function code by disconnecting the data charrnei- The PPU then acti- 
vates the channel and inputs a 12-bit word- Status may be repeated 
at this point simply by doing another input- When it is desired 
terminate the reading of status i the PPU must issue a disconnect 
to the data channel. 

Status bits are assigned to indicate the following 



2 
2* 

23 



ECS Abort 
ECS Accept 
ECS Parity Error 
ECS Write 



2Q - 



ECS Abort 



This status bit indicates that an Abort signal has been received 
from ECS- 

al 

g - ECS Accept 

This status bit indicates that an Accept signal has been received from ECS 
2 g ,- ECS Parity Erro r 

This status bit indicates that a Parity Error signal has been received 
from ECS- - 
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Urite 



This 
ECS. 



Uhen 



bit indicates that the DDP port is busy with a write to 



the wri ca 



terminates -i this status bit will clear out. 



Besides being cleared by a port or master clear-, the status bits 
■(Abort-. Accept-, and Parity Error > are cleared out either by a new 
request to ECS or by reading status- Status must be read to clear 
out a DDP generated disconnect due to an ECS Abort or an ECS Parity 
trror . 

501 Q - ...Port Clear 

This function is a programmable master clear for the data buffers 
and control logic within the DDP associated with the port to which 
this function is issued- This function-, as does Deadstart Master 
Clear-, clears only that DDP port to which the clear is issued. 



INTERLOCK REGISTER - ILR 

INTRODUCTION 

The Interlock Register -CILR3- is another new hardware feature that 
is available on all CYBER 70 machines- It is a feH-bit register which 
could be expended to 155 bits- It can be accessed by the PPlMs 
through two data paths. An Interlock {channel IS^} will be added 
to each set of 10 PPU's to enable up to 20 PPU-'s to access the ILR- 
Initial software utilization of the ILR will include primarily I/O 
channels and pseudo-channels interlocking. 

Interlock Register 



Uord liiord Uord Word Word i Uord TtJord ! Word Word ; Word i Word ! 
10 1 a 7 b J 5 ! »4 ! 3 : 2 j 1 1 ! 

53 ft fa3 S=i 47 35 23 11 Q 



127 111 J.Q? TS 



m - yard 10 is a bits- % 

mm - Uord S is 4 bits in the faM-bit Interlock Register. 

OPERATIONS 

Eight operations can be performed on the Interlock Register from 
the °PU- * ; 



1. Set 



Sets a bit specified by the octal translations Q =^77* or 



Q -^>i77 



a* 
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2'." Clc-ir 

Clears a bit specified by the octal translations Q >• 77- or 
r> i <-7£ . 

3 • ' Test ; 

Checks a bit specified by Che octal translations ^ ?7g or 
'*» I77g and sends the ?Py a status of °1*' or '0', depending 
on if the bit is set or clears The status bit will be located 
in the bit zero position in the 12-bit word. The other 11 
bits in the status word will be zero. 

4 - R*ad 

One of the b or juJ. words specified by the octal translations 
> Sa or Q > 12 are read into the PPU. The upper four bits 
will be zero if word 10 is read- The upper eight bits will be 
zero if word S is read in a bf-bit register- 
s' external Set or Clear 

■ — *— mmmmmmm m ■ t urn n 1 1 r i >m w ummmm m ■ ■ ; i 'r ii^»— — —^— . 

Sets or clears one of the lower 13 bits from external sources. 
In the 126-bit register n bits bH - 7b may also be set from ex- 
ternal sources. Bit Qwill be assigned 'as the 'power off bit* 
and will set when the input power to the flG drops* The power to 
the computer will drop approximately 5QQ milliseconds after 
bit sets. 

b~ Clear All 

Clears all bM or 123 bits. 

7. Test All • _ 

Tests all b4 or- 12fi bits and sends the PPU a status of *l v if 
one or more bits are set. 

S. Simulta neous Ooerations 

Test/Set A test is made on the bit with the bit ending 

up set. 

Test/Clear A test is made on the bit with the bit ending 

up clear. 
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Instruction Forma Z 
LBCvv,-.! 5000 

\ xxxx 
oan *s* i ?ais 

IAN :-" ' 701 S 

i 



Instruction Code 



oxxx 


Read 


ixxx 


Test 


5XXX 


Clear 


3XXX 


Test/Clear 


4XXX 


Set 


SXXX 


Test /Set 


bXXX 


Clear All 


7XXX 


Test All 



Where XXXX is the descriptor word: 



i 

I Instruction Code 
t 



N.U. 



N.U. 



Octal Translations 



11 



10 



a 



b 



8its 7 and & of the Descriptor Word are reserved for future enhance- 
ments and should be zero. 

On the Seti Clear-, and Clear All operations ■>" zero is returned to the 

PPU . 

The only way bits can be cleared in the Interlock Register is by 
doing a 2 XXX -, 3XXX-, or a bXXX. 
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CENTRAL ngriQRY ACCESS P3T03ITY - CHIP 

CHAP'S Effect on ECS Transfer* 

The Central Memory Access Priority -CCMAP} is another standard 
hardware feature en the CYBER 70 machines models ??->' ? 3 *nd ?H . 
Its orim«ry function is to i morove CM-ECS transfer rate by allowing 
only Apriority' CM accesses -Cread/uri te> by a PPU to oe honored 
"during an ECS transfer. It thus ensures that CM-ECS transfers 
are maintained at the maximum rate for a given configuration. 
Without CHAP-, any PPU CM request can interrupt an ECS transfer. A 
maximum of one PPU request can be honored every ECS record or 
eight CM words- This could reduce the transfer rate of a large 
ECS system up to ?S percent-, although a small -C123K> secern is 
not affected- 

CflAP prevents nan-oriority reads or writes from entering the read 
or write pyramid while ECS is active. But when ECS becomes active-, 
it is possible that some writes could be trapped in the write pyra- 
mid- This writes that are hung in the write pyramid will not be 
serviced until ECS transfer is complete- However-, if a priority 
write appears during this time* CHAP will interrupt the ECS trans,' 
f&r and the priority write as well as any non-priority writes that 
were trapped in the write pyramid will be serviced- 



CHAP'S Effect on PPU ftead/Urite 



By allowing only oriority read/write to access central memory-. CHAP 
provides a PPU with an opportunity to access CM at a much improved 
rate during an ECS transfer. When ECS is inactive-. CHAP allows a. 
PPU to place a reservation for the read/wri te pyramid if it failed 
to gain access to the pyramid on its initial request- This ensures 
that a PPU with a priority request will gain entrance to the pyramid 
within a few major cycles {microseconds}* . To achieve this-, a basic 
change is made to the read pyramid to allow data to flow unrestricted 
through the pyramid and give all PPU an equal chance of getting intV 
the read pyramid- This Change applies to both oriority and non- 
priority CM accesses- 

CMA P's Effect on SCOPZ 3 , M 

The SCOPE 3-M rotating mass storage device stack processor •CiSP/IEP> 
usesCMAP priority for one word Cfl accesses within certain time 
critical loops- Such priority Cn accesses may interrupt an ECS 
transfer-, but will not delay it signi f icantly-. since only a single 
word is being read/written. At the same time-, the stack processor 
can continue executing* rather than waiting for 'the ECS transfer 
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to complete- The stack processor would be required to y.?ic unnec- 
essarily if CHAP priority was not used for trie CRD/CltiD in^-ruc tions • 

The stack processor does not use priority for Cfl block transfers- 
This means that CHAP uiU prevent stack processor CRrt/CUn instruc- 
tions from starting if an ECS transfer is in progress- The reason- 
ing here is that if the PPU Cfl block transfer and the ECS transfer 
were allowed to occur simultaneously-, both uould be slowed and lost 
disk revolutions would probably result- It is more efficient to 
allow the £CS. transfer to complete-, and then honor the PPU CH block 
transfer** 
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STUDY flUESTIONS 
HARDUARE OVERVIEW - SECTION IV 



1- The minimum standard number of PPs on a CYBER is .- .. ■ 

5. The number of PPs on a CYBER may be expanded to J ,.'.. ] . ... . . 

3- Any PP may talk to any other PP on any channel- 
•CaJ True 
■Cb> False 

M« PPs may execute concurrently with the CP-CsJ- 
€a> True 
■Cb> False 

5- PPs may execute concurrently with other PPs- 
■CaJ True 
-Cb> False 

b- A PP must do all Input/Output for SCOPE- 

•CaJ True 
■Cb> False 

7» The read pyramid allows input to the PP- bits of 

data*' may be input during one time in the slot- "** 

3- Direct calls are used like special registers 
-CaJ True 
-Cb> False 

1- The system Monitor resides . ' ... . 

10. What does CHAP allow? 
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STUDY QUESTIONS 
HARDWARE OVERVIEW - SECTION IV 



1. The minimum standard number of PPs on a CYBER is f 
H- The number of PPs on a CYBER may be expanded to y SUP 



3- Any PP may talk to any other PP on any channel - 

(23^ True 
-Cb> False 

H* PPs may execute concurrently with the CP-Cs>« 
<jfa^) True 
•Cb> False 

5- PPs may execute concurrently with other PPs- 
CiaO True 
•Cb> False 

L- A PP must do all Input/Output for SCOPE- 



_Ca£/ True 
-Cb> False 

?. The read pyramid allows input to the PP- ^-- b its of 

datarmay be input during one time in the slot- 

3- Direct c/flls are used like special registers 
<^a^ True 
•Cb> False 

*?• The system rionitor resides /*? I/O 

ID* What does CMAP allow* , 



a-cr«rj 7^ ceo*"fr&( -r^^^ia^u . 
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INSTRUCTIONS 
Lesson Guide 

REFERENCES: 

PP Compass Student Guide Section V 

Instruction Description Ref« Vol- II 
TRAINING AIDS: 

Visuals VALS-53-S-27 thru VALS-53-S-3T 

ASSIGNMENTS: 

Instruction Problem Set -1 
Instruction Problem Set S 
Instruction Problem Set 3 
Coding Examples 1 thru 12 
Instruction Problem Set H 

OBJECTIVES: 

•C1J To present detailed information about programming the PP* 

-C2> To present central memory to PP Input Output instructions. 

-C33- To present sufficient coding examples and exercises to 
aid student in learning details of PP coding* 
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INSTRUCTION 
Lesson Outline 



Instructions 


A- 


Formats 







One word 







Two words 







Components 




o 


Examples 


B- 


nodes 







No address 







Constant 







Direct 







Memory 







Indexed Memory 


C- 


CI 


assifications 







Loads and stores 







Adds and subtracts 







Replace adds 







Shift 







Logicals 







Jumps 







Miscellaneous 







Central Read/tilrite 







Peripheral Input/Output 



Exercises 



S-5 



VALS-S3-5-3 



INSTRUCTION FORMATS 



INSTRUCTIONS OCCUPY QUE OR UO WORDS 



1. 



f d 



? 



OP CODE 



DELTA: OPERAND OR 

OPERAND ADDRESS 



THESE. ARE FOR INSTRUCTIONS CONTAINING 
SHALL CONSTANTS OR 
REFERENCING DIRECT CELLS 




OP CODE 



lfl-BIT OPERAND OR 

OPERAND ADDRESS: 

. DELTA = 

H IS DIRECT ADDRESS 

. DELTA * 

D CELL CONTAINS 
INDEX FOR ADDRESS (1 



S-3 



VALS-53-S-it 



INSTRUGTiOu : EXA^;?LES 



14 


12 




30 


; 02 




40 


20 



LBN 



LDD 



LDL 



10 



203 



20 12 



3456 



LOG 



123456B 



20 



00 



0012 



LOG 



10 



50 



00 



0773 



LDM 



773B 



50 



00 



0074 






74B 



50 70 



0773 



LDivi 



s- 4 



7733,703 



AttkRESSlHC- V\Ot>SS, 





tAOT>E 


OPERft»4\> ' 
ftT»T>ftESS 


OPteft&HT> 


EXftW^Lf? 




NO fVbD&ESS 

* 
*•* 

fOEWDRY 

INDEXED d£0 

* 

XntaRECi 

< 


P Sfcuxu. h &** 
dL 

U) 


dl-tTm. 
(A) ' 

Cm+U» 


UT>D 


* |\4 (OA 


— > ft 
I -*ft 








ISMffaK i CLG \\ X 




|34 5£> 








74B 3ol74' 






in 
l 


173B l 50 l, 00 | 
| T T3 1 


In 


WllLlift UO I 70 




' \ OT 13 








iLfcfc 1 HO \X6 













SJ».CS5v>£i U>&>*C$ 



i 

in 

UJ 

I 

In 

I 

In 



W-» 



QLcL*£-\£U^ "rXLG&JLA 






- U^M a \W^N t Q ft, I 



^ fe &&» 



S^jDuxr*^** -uu a/*> ri.eJfcfaa,* 



s 



N YA-adfl- 1^ Ls>u ZxnsM (L&vu&cudo Cki***} 



G. - 










luacl ia. 1 






| 3 H 51= 






'VTV. 


'Si 






S-fa 



^ a. 






Vw 1> M T73& 



<V 


4 


UIDty 


oo 


o n n 3 



ir<\» 






S-7 



jUNv^Lfl-if 2 -^ y*AJUSYV$>uj, nrvuQ&Q- ' 



$ a 



w I> M 7733 ; 703 l^ m l ? Q 



07 13| 



T*V» 



.ifc* CL9\CfcaAOu5 cx^»- cx-a-^bLdl Aro 77?> 



'._. _ . ._._ ' 5 A 
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VALS-S3-S-1 

INSTRUCTIONS 





Loads and Stores 




LDN 


LCN 




LDC 
LDD 
LDM 
LDI 




STD 
STM 
STI 



Adds and Subtracts 



ADN 
ADC 
ADD 
ADM 
ADI 



SBN 

SBD 
SBM 
SBI 



Replace Adds 

RAD AOD 
RAM AOM 
RAI AOI 



SOD 
SOM 
SOI 



Shift 
SHN 



LMN 
LMC 
LMD 
LMM 
LMI 



Logicals 

LPN 
LPC 



SCN 



Jumps 



UJN 
LJM 
RJM 



ZJN 
NJN 
PJN 
MJN 



Mis cellaxxeous 

PSN 
EXN 
MXN 
RPN 

MAN (Cybers only) 



-Central Memory Reads/Writes 



Peripheral I/O 



S-1 



LOAD AND STORE INSTRUCTIONS 



Ln 

I 

fcr 1 



LDNJ- load a 6-bit 

constant into A 



LCN 



load a 6-bi t 
(complemented) 
constant i ivto A; 



LOG - load an 18-bit constant into A 



LOO 



load contents of 
direct cell 
into A' 



LD.vi - load- contents of 
memory cell 
into A 

load contents of 
any cell into A, 
indirectly thru 
a direct cell 



LDI 



STD | - store contents of 
A into direct cell 



STM 



sjTJ- 



store contents : of 
A into memory cell 



store contents of A 
into any cell, 
indirectly thru 
a direct cell '•• 



<: 

r- 
n 
i 

(41 

UJ 

I 

Ln 

a 



VALS-S3-S-11 



ADD and SUBTRACT INSTRUCTIONS 



ADN 
ADC 
ADD' 
ADM 
AD I 



SBN 



SBD 
SBM 
SBI 



Adds-: 

a 6-, 12-s or 18-bit number 
is ad'ded to the contents of A 

. ........ ...... - . 

Subtracts: 

t - . 

a 6- or 12-bit number 
is subtracted from A 



* 18-bit arithmetic is used 



5-11 



VALS-53-S-12 



n i- r> i • a n r~ 

[KCf LrtbC 



^DD IN.STRUGTIQNS 



h 



RAD 


AOD 


SOD 


RAM ' 


AOW 


SOU 


RAi 


AOI 


SOI 



a 12-bit number (unsigned) 
may be added to the A register 
and to the memory location 

the number 1 

may be added to or subtracted 

the A register 

and the memory location 



from- 



I i 



* 18-bit arithmetic is used * 
the result is in A and memory 



5-15 



VALS-S3-S-13 



LOGICAL INSTRUCTIONS 



LM 


LPN 


LMG 


LPC 


LiVlD 




I • MS 




LMI 





SON 



exclus i ve or: 

a 6-» 12, or 18-bit number 
may be exclusive ored with A 

• * 

and: 

only a 6- or 13-bit constant 
may be anded w i th A 

selective clear: 

a 6-bit constant 

may selectively clear bits in A 



5-13 



VALS-53-S-14 



SHIFT INSTRUCTION 



SHN 



LEFT shifts: 
. end-around 



ie SHN 6 

shifts A left 6 bits 

before: (A) = OOQOOo 
after: (A) = 000500 



RIGHT shifts: 



end-off 

no sign extension 

ie SHN -6 

shifts A right 6 bits 

zeroes are filled in from the left 

before: (A) = 77T7T4 

after: (A) = 007777 -e- note! 



s-m 



VALS-S3-S-1S 



-..-■. JUMP INSTRUCTIONS 
uncondi t i onal: 

UJN - jumps up to 37ft locations 
forward or backward 

LJivi - jumps any number of locations 
forward or backward 

RJi/t - jumps to any location 

plants return address there 
executes instruction in next word 

conditional: 

ZJN - jumps if A is +0 

NJN - jumps if A is not +0 

PJN - jumps if A is positive 

c - MJN - jumps if A is negative 



* conditional jumps are 
up to 3?3 locat i ons 
forward or backward 

*. address field may contain 
„_a number 

• "(jump i s to P + n) 

or a location symbol' 

(jump is to the location) 

5- IS 



Instruction Problem Set 1 
Contents of the following core locatiors are given. 



All numbers are m 



octal- 



■C0D2S} * 1234 
-CQQ34> = 1111 

■coj.aa> = 1111 

-CQ12S3- - 2252 
{1111} = 7777 

uzmy = 4321 

■U334} * 3333 
■C13bl> * 1234 
{2345} = 4444 



york each question indeoentlv. 



Show the contents of the A register after the instruction 
has been executed. ♦ - 



<A> Register 



1> U>N 25 

2} L»B 2S 

3> L5« 1GQ 

M> LDtt 100-.2S 

S> LDI 25 

t> U>fl QV25 

?} LDC -100 

fi> U>N -25 

1> LDtl 1111,25 

10> LCN 25 . 



11. How many words of code dc the 
above instructions generate? 



S-lfe 



n .h i : i . i f. V In V. .' ! '.* .rji.-.i.- i ; 



On the following store instructions! indicate? 

The contents of the A register after the store 

The contents of the core location 

The location at which the data is stored 



12> LDC !23MSb8 
STD 258 



13} LDC 123M5fc»B 
STfl 10008 



1M> LDC !23M5bB 
STI 2SB 



15* LDC l23M5bB 

STn 10008 -.253 



lb} LDD 2S8 
ADN 258 



•CA} 

-Cloc} •- 
loc is 

■CA} I 
■Cloc} = 
loc is 

■CA} 

■Cloc} ' 
loc is 

•CA} 

■Cloc} : 
loc is 

■CA} 
■CA} 























. 







Instruction Problem Set 2 



Use the data given in Problem Set 1 
work each problem i ndependently 

{Note thac each problem has several instructions 
to be worked cumulatively} 

Indicate the contents of A after each instruction is executed 
•-CThe problems are numbers 17-33 on the following page} 



5-17 



17> 


LDI 
SBN 


3 MB 
L. 


15> 


LDfl 
ADD 


1U00 
10 OB 


l e l> 


LDD 
SBD 


3 MB 
■343 


20> 


LDH 
AD I 
S3I 


123MB 
2SB 
3 MB 


21> 


LDrT 
ADC 

STn 


123MB -,3MB 

123M-5L8" 

2SB' 


22> 


ldn 

ADM 
ADH 


•1008 
1008 
100B-,25B 


23> 


LDfl 

sen 

sbh 


125B^2SB 

12S8 

10QB-.2SB 


2M> 


LDC 
SHN 
SHN 
SHN 


123MSLB 
1MB 
-TIB 
3b8 


2S> 


LDH 
LflN 


13blB 
MbB 


2b> 


LDC 
LPN 


23M53 
123MB 


27} 


LDI 
SCN 


2SB ■, 
2 S3 


2S3 


LDC 
LfID 


l23M5bB 
2SB 


2^J> 


LDN 
SHN 
ADN 
LftI 


228 
1MB 

SSB 
3MB 


30> 


LDC 
SHN 
LPC 


123MSLB 

-b 
123M5L8 


31> 


LDC 
SHN 
LMC 


123MSL8 
. -11B 
l23M5bB 


32> 


LDn 

SHN 

Liin 


1000 

I, 

3M8 


33 > 


LDrl 
SHN 

STM 


l003-.2f>B 
3MB-.2SD 



.' -CAJ = 



-CA> = 


{AJ = 


■CA> = 


-TAJ « 


-CA> ~ 


.■CA> = 


■CAJ = 


-CA> * 


-CAJ = 


<A> = 


iioO = 


• -CA> = 




<A> = 


-CA> = 


<A> = 


■CA> = 


■CA> =» 


*A}*« 


- 


•CA> * 


• -CA> = 


•CA> = 


■CA> = 


-CAJ- « 


■CA> =. - * 


■CA> = 


■CA> = 


< 


•CA> « 


CA> = 


• 


■CA> = 



S-lfi 



<A> = 



•CA> » 



•CA> = 



-CA> = 



-CA> = 



p 



Instruction Problem Set 3 

Use the data given in the core locations in Problem Set 1 
The A register contains 



123MSb 



Idork each problem independently. 

Indicate the contents of the core location and A register 
after each instruction is executed. 



1. 


RAD 


3MB 


2. 


AOD 


3MB 


3. 


SOD 


as.3 


M. 


RAI 


25i3 



S. AOI 

b. SOI 

7. RAM 

S. AOfl 

c i. SOU 

ID. RAtt 

11. AOH 



3M3 

343 

123MB ' 

123MB 

HUB 

1008t2SB 

2S3-.3M8 



■C3M>- = 
■C3M> 
•C2SJ 

•CloO * 
loo is 
■CloO = 
loc is 
■CloO = 
loc is 
■C123M> = 
■C123M> = 
-Cllll> = 
■Clocj = 
loc is 
■CloO » 
loc is 



<A> 
-CA} 
■CA> 
•CA> 

■CA1 

iA> 

■CA* 
■CA> 
-CA* 
-CA> 

•CA> 






s-n 



<^ET 


4 


16. 1234 


/set 


*..-. 




25. 


001234 




1. 


25 


17. 


00S65S 




2. 


1234 


1261 




007771 






001272 




3. 


1111 




18. 


001111 




26. 


002345 




4. 


3333 






error 






error 




5. 


4321 




19. 


001111 






004321 




6. 


4321 






oooooo 






004300 




7. 


77 7S67- (*7 


1 


20. 


004321 




28. 


123456 




8. 


error 






010642 






122662 




9. 


4444 






000643 




29. 


227722 




10. 


777752 




21. 


004444 




30. 


001014 




11. 


15 






130122 




31. 


123575 




12. 


123456 
3456 






0122 


in loc 


25 








loc 25 




22. 


001111 




32. 


110011 




13. 


123456 
3456 
loc 1000 




23. 


002222 
005555 
001234 




33. 


333300 
3300 in 


1270 


14. 


123456 
3456 
in JZ3?) 






777011 
773456 














24. 


123456 










15. 


123456 
3456 
loc 2234 


* 




561234 
000561 
610005 










■ ■ . ■- lL " ; "\' T '"' 




124567 




7. 


7777 


127777 




<^SET 


f& 


■. 


1. 


4567 




2. 


1112 


001112 




8. 


4322 


004322 


■* 


3. 


• 1233 


001233 




9. 


7776 


007776 




4. 


7777 


127777 




10. 


7011 


127011 






1234 


-oioooo- 




loc 


1334 








5. 


0000 


010000 




11. 


1 


(1136+1) 




loc 1111 






loc 


1136 






• 


6. 


7776 


007776 














loc 1111 
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1. 




CODING EXAMPLES 



A8T 



Uhat does this code do » 



ABT 



2. How to fix a jump that "won't reach; 



PJN 
LJM 



*+3 
ABT 



code: 

100 
words 



*BT 



\ 



3. HOW THE RETURN* JUMP INSTRUCTION WORKS: 



'TAG' 



ORG 
LDN 
STD 
RJPt 



DATA 
DATA 



10008 
1 



100 





a. -CTAG> * 



b. -CTA5+1> * 



c» Where does execution 
continue? — - ■ 

d. Why is P*2 the 
return address? 



V. 



STtl 
LJH 



*+3 

TAG 



Where does the 
STtl store? 



5-51 



s. hou to hake: a loop 



LDN 
STB 



M 

1HB 



LP 



How many times is this 
loop executed? 



SOD 
NJN 



1MB 
LP 



fe,. HOU NOT TO HAKE A LOOP 



LP 



LCN 
STD 



AOD 
NJN 



4 

10S 



108 
LP 



Uhy is this a hung loop? 



7. HOU TO HOVE CORE 

S* ven : -CIS* 
{17} 



LDfl 
STn 



b. 



LOOP 



LDI 
STI 

LDC 
STD 

LDI 

sth 

AOD 
ADC 

njN 



laoos 

20008 



0-.1SB 

1000B-.1SB 



1SB 
178 

10008 

1 

1 

1C000-.1 
1 

-10778 
LOOP 



J 

) 

J 



7 



In each example-, 
how many words ar& moved-. 
and from what locations 
to where? 



S-E2 



J 



3- "HOSJ VO HAKE AN INCLUSIVE OR 





LD?t 


TA'jl 




STil 


AMD+1 




. LDfl 


TAS 


AND • 


LPC 


XX 




STD 


2 




LDfl 


TA6 


• 


Liin 


TA51 


TA<3 


ADD 
DATA 


2 
12648 


TAfil 


DATA 


HMM1S 



•\ 



a. Uhat is the inclusive 
OR of 1264 and WW? 



Is it necessary to 
load TA61 and store 
it in the LPC 
instruction? . 

blhat value does ** 
assemble as? 



<?» HOU TO ADD lfl-BIT NUHBERS 



Given: 

( IN )= 0012 
( IN+1 )= 77 Sh 



IN and IM+1 represent an Ifi-bit 
relative CM address which must 
be updated 



LDC 
RAH 
SHN 
RAO 



100B 
IN+1 
-12 
IN 



1277SL 

100 
13Q0iib 



100 & is fcq lfl 

1 pru 



S-23 



i-». 



ALGORITHM FOR WORKING WITH 12-BIT SIGNED NUflBERS IN OCHORY 



DATAl 


DATA 


laB'iB -.75^38 -.00058 


DATA2 


DATA 


a0D0Bi7S53B-.77tb8 


ANSWER 


BSS2 

? 

LDN 


3 
.2 




STD 


2 


ADD 


LDC 


7700008 




ADn 


DATA1-.2 




ADn 


DATA2-.2 




sth 


ANSUERi2 




SOD 


2 




PJN 


ADD 


X 


VFD 


12/DATA1 


Y 


VFD 


12/DATA2 


Z 


VFD 

DUP 


12/ANSLJER 
3-,7 




LDC 


770000B 




' ADI 


X 




ADI 


Y 




-" STI 


Z 




AOD 


X " . 




AOD 


Y 


DATAl 


AOD 

S 

DATA 


Z 

ia3MBi7tM38iOQDSB 


DATA2 


DATA 


20008 ■,7S238-,77LbB 


ANSUEF 


8SSZ 


3 



Question: tdhafc type of numbers are in: 

DATAl ... 

DATA? 

ANSL'Cf, _^______ 



S-2^ 



//. 



INTEGER HULTIPLY 



ANS 



LDC 


500 


STD . 


1 


SHN 


M 


SBD 


1 


S8D 


1 


SBD 


1 


STM 
SHN 
STM 


ANS+1 
-12 

ANS 


< 

BSSZ 


5 



What are the numbers 
multiplied? 



How many words of 
core does this coda 
occupy? 



/2« 



INTEGER DIVIDE 



DVDN 
DVSR 


Et2U 
Ef2U 


108 
11B 


a. What numbers are 
divided? 


ANS 


E(2U 


12B 




REM 


EiSU 


138 


-.. . . • _ 


■ ,.- 




r 

LDN 





b. What is the answer? 




STD 


ANS 


• 


DIV 


. LSD 
SBD 


DVDN 
DVSR - 










flJN 
STD 


OUT 
DVDN 


c. What is the remainde: 




AOD 


ANS 
DIV 






UJN 




OUT 


ADD 


DVSR 


. 




STD 


REM 




DVDN * 


1 

DATA 


30 


-C10> = 30 


DVSR 


DATA 


13 


■Cll} = 13 


ANS 
REfl 


3S3Z 
BSSZ 


1 
1 
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ANSWERS TO CODING EXAMPLES 



Assembly. error. 

ABT is too far away. 



2. The PJN jumps around 
the LJM. 
The LJM can reach ABT. 



a. 100 

b. 1004 

c. TAG+2 

d. RJM is two words 

Second word of LJM 
instruction. 



5. four 



The AOD in this case 
always leaves (A) ^ 



11. 


+1234 


-0134 


+0005 




+2000 


-0254 


-0011 




+3234 


-0410 


-0004 




Solution formula: 




770000 


770000 


770000 




+1234 


+7643 


+0005 




771234 


777643 


770005 




+2000 


+7523 


+7766 




773234 


007366 

1 

007367 


777773 


IU 


a. 800 

b. 12 


x 13 




2Z.- 


a. 30 • 

b. 2 
c 4 


*.-13 





7. 


a. 


one word - * 
from 1000 to 2000 




b. 


one word - 






from 1000 to 2000 




c. 


7?3 words - 

from 1000+ to 2000+ 


8. 


a. 


5664 




b. 
c. 


yes - 

there is no LPM instruction 





9. - 



5- 5b 



VALS-S3-S-E7 

FORMAT OF THE. CRD- 

1. Reserve a PP buffer to read the data into 
(Locations 10-14 will be used) 



2. Load CM absolute address into A: 

LDC- 123400B 



3. Execute the Central Read instruction: 



CRD . 10B • 

PP memory location 10 
is- beginning of a 
5-word PP buffer 
•to contain 1 CM word 



* After the Read, (A) is not destroyed * 
(in this case, 123400g) 
5-S7 



VALS-53-5-23 



CENTRAL MEMORY 



READ and 9RITE INSTRUCTIONS 



CRD - reads one word 
CRM - reads a block 
CWD - writes one word 

■ § 

CWU - wri tes a block . 



s-sa 



VALS-SH-S-BT 



FORMAT OF THE GRM 



1. Reserve a PP buffer to read the data into: 



BUF 



BSSZ 20 



2. Store the block length (CM words) in a direct cell: 



LDN 
STD 



■i 
10B 



3» Load the absolutized CM address in A 



LDG 



123400B 



4. Execute the Central Read instruction: 



CRM BUF,10B 



PP Buffer 
to read into 



Direct Cell 
containing 
CM word count 



*:' After the Read, (A) is CM LWA+1 
(in this case, 12340<. Q ) 



S-2=i 



1. 



2. 



LDC 
CRD 



LDC 
CWD 



Instruction Problem Set #4 



400B 
SOB 



60000B 
10B 



a. (A) 



b. What does this code do? 



a. (A) 



b. What does this code do? 



3. 



LDN 


16 


STD 


2 


LDC 


400B 


CRM 


BUF, 2 



BUF BSS 



80 



When the Read is finished, 
but before the original P is 
rest ored , what is : 



(A) 

(Q) 

(p) 



(loc 0) 



4. ADDR DATA 



1 



BUF BSS 



0021B 



,2222B \ What does this code do? 



LDN 


5 


STD 


2 


LDM 


ADDR 


SHN 


12 


ADM 


ADDR+1 


CWM 


BUF, 2 



25 



V 



/ 
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CODING CONVENTIONS 



b-Q 



CODING CONVENTIONS 
Lesson Guide 



REFERENCES: 

PP COMPASS Student Guide Section VI 

TRAINING AIDS: 

Visuals VALS-53-b-3i VALS-53-b-lO 

ASSIGNMENTS: 

Study questions Section VI 

OBJECTIVES: 

ili To present the SCOPE System Symbol coding conventions 

-C33- To introduce freedom from hand coding by using symbols' 

-C33- To introduce SCOPE System Texts- 

■CO To introduce SCOPE PP Programming naming conventions- 
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CODING CONVENTION 
Lesson Outline 



VI- CODING CONVENTIONS 



A- System Symbols 

o Definitions 

o Examples 

o As system communication aids 

B- System Texts 

o Provide commonly used MACROS 

o Provide commonly used MICROS 

o Provide commonly used Symbol Definitions 

o From Libraries 

o Called from COMPASS control card 

o Classified into functional modules 

C« PP Program Naming Conventions 

o Three Alpha characters 

o Most names already used 

o Number signifies where loaded 

o Some reserved for user 



t-2 
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SYMBOL DEFINITIONS 



D . X X A DIRECT CELL IN PP MEMORY 



EXAMPLE 

D.FFO is loc 50 
D.PPIRB is loc 50 



R . X X A PP RESIDENT ROUTINE 



R.IDLE is loc 103 



M . X X A MONITOR FUNCTION 



M.DPP is 12 
M*ABORT is 13 



T . X X A SYSTEM TABLE IN CMR 



T.FNT is 

FILE NAME TABLE 



P . X X A POINTER IN CMR TO A TABLE 



P.FNT "byte is 
ADDRESS OF FNT 



C . X X A BYTE IN A CMR WORD (0-4) 



or 
A PP CONSTANT 

L . X X LENGTH OF A CMR TABLE 

or 

A PP LENGTH CONSTANT 

W .XX A WORD IN CMR: 

PP COMMUNICATION AREA 
CONTROL POINT AREA 

F . X X AN ERROR FLAG VALUE 
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C.CPRA is 3 



C.PPFWA is 1000 

L. TAPES is LENGTH 
of TAPES TABLE 

L.PPHDR is 5 



W.PPMES1 is WORD 2 
of PP COMM ARE\ 

W.CPSTAT is WORD 20 
of CP AREA 

F.ERPP is 3 
(PP Abort code 
passed by M. A BOUT) 



EXAMPLES OF GOOD CODE 



1. HOW TO READ THE PP INPUT REGISTER ?ROM CENTRAL MEMORY 
AND GET THE CP NUMBER AND CP AREA ADDRESS 



LDD 


D,PPIR 


CRD 


D.PPIRB 


LDD 


D.PPIRB+1 


LPS 


7 


SHN 


7 


STD 


D.CPAD 



2. HOW TO GET RA AND FL AND BRING THE*! INTO THE PP 



LDD 


D.CPAD 


ADN • 


W. CPSTAT 


CRD 


D.TO 


LDD 


D.TO+C.CPRA 


STD 


D.RA 


LDD 


D.TO+C.CPFL 


STD 


D.FL 



3. HOW TO ABSOLUTIZE A CENTRAL MEMORY ADDRESS 



r 
^ 



LDD 


D.IN 


SHN 


6 


ADD 


D.RA 


SHN' 


6 


ADD 


D.IN+1 



b-q 



HOU* TO 1/R.ITE A PP BUFFER TO CENTRAL MEMORY 
-32 PP WORDS - 



LDN 


7 


STD 


7 


LDN 





STM 


IN+32 


STM 


IX+33 


STM 


IN+34. 


LDD 


D.IN 


SHN 


6 


ADD 


D.RA 


SHN 


6 


ADD 


D.IN-KL 


CKM 


IN, 7 


LDN 


7 


RAD 


D.IN+1 


SHN 


-12 


RAD 


D.IN 



IN BSS 35 



The above code wrote 35 PP words, which is 7 CM words, 
to Central Merapry. The last 3 bytes were zero, because 
only whole CM words may be written. 

The code also updates the IN pointer. 



b-5 



X 



A. HOW TO CLEAR 5 PP WORDS 



LDN 
CRD 



P . ZERO 
D.TO 



CM ADDR CONTAINS 
CLEAR D.T0-D.T4 



This is faster and uses less code than: 



LDN 





STD 


D.TO 


STD 


D.T1 


STD 


D.T2 


STD 


D.T3 


STD 


D.T4 



j 



5. HOW TO CHECK TO SEE IF THE CPU IS RUNNING: 



OK 



STD . 


2 


RPN 




LPC 


7777B 


SBD 


2 


NJN 


OK 


LJM 


TIMOUT 



t 
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SCOPE SYMBOL DEFINITION B 



SCOPE text (SCPTEXT) contains system macros, micros, and symbols used by COMPASS CPU and PPU pro- 
grams that comprise the SCOPE operating system. SCPTEXT contains the following common decks: 

ACTCOM CPU program system action request macros 

COMAFET File Environment Table generation macros 

COMSRAS System communication (RA) symbols 

CPSYS CPU input/output macros using the Central Program Control (CPC) library routines 

PPSYS PPU program system macros, micros, and symbols. 

SCPTEXT is made up of CPCTEXT and PPTEXT. CPCTEXT may be used when only user-mode CPU programs 
are assembled, and PPTEXT may be used when only PPU programs are assembled. 

Common deck COMSRAS contains definitions of symbols of the form RA.xxx which are addresses of words 
in the communication area (RA+O through RA+100). 

A listing of system symbols can be obtained with the following job deck: 

job card (including a request for MTOl 

REQUEST(OLDPL,E,HY) SCOPEPL1 

UPDATE(Q) 

COMPASS(S=Q,I=COMPILE) 

7/8/9 

♦COMPILE PPTEXT 

6/7/8/9 
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VALS-53-b-lO 

PPSYS IDENTIFIERS 

Common deck PPSYS contains definitions of symbols of the form: 

ijnn 

i Identifier; one or two alphabetic characters specifying the category to which the symbol belongs. 

C Byte number in CM word (0-4). C identifiers are used for flags and parameters of 

12 bits or less. 

CH Pseudo channel assignments 

D Direct cells 

EX M.ICE parameter values 

F Error flag values 

L Lengths 

LE Length, of table entries 

M PPU request of monitor 

O Stack processor orders 

OV PPU overlays; mnemonic is the overlay name 

P CM location of pointer words 

R PPU resident entry points 

S Number of bits to right shift a parameter to right justify it in a PPU word. Some 

symbols, notably those related to the scheduler, are the number of bits to right shift 
a parameter to right justify it in a CM word. 

T First word address of CM tables, the system programmer should use the P. definition 

rather than access the table directly with the T. definition. 

W Relative positions in CM tables 

ran Mnemonic; one to stx^alphanumeric symbols suggesting the use of the symbol. For example, 
PJZERO identifies CMR pointer area word 0, which contains binary zeros. 
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SYSTEM TEXTS / 

System texts provide commonly used macro-, micron end symbol de- 
finitions for use in COMPASS source programs- SCOPE provides several 
text overlays which are loaded by COHPASS from the system libraries 
when specified by S parameters on the COMPASS control statement- S 
parameters can also be used on FTN control statements when FORTRAN 
source programs contain intermixed COHPASS subprograms. Up to seven 
system texts can be specified-! each by a different S parameter i for . 
a given assembler run- The system texts are made up of UPDATE common 
decks described below- 

COMMON DECKS 

System Action Request Macros: ACTCOM 



IXi Xj*Xk 


DISPOSE 


RECOVR 


IXi Xj/Xk 


ENDRUN 


REQUEST 


IXi Xj/Xk-.8n 


FILESTAT 


RTIME 


ABORT 


JDATE 


SYSCOM 


CHEOCPT 


L0ADREC2 


SYSTEM 


CLOCK 


MEMORY 


TIME 


CONTRLC 


MESSAGE 


TRANSR 


DATE 


RECALL 




:/-0utput Macros 


using CPC: 


CPSYS 


8KSP 


READIN 


SKIPF 


BKSPRU 


READN 


UNLOAD 


CLOSE 


READNS 


WPHR 


CLOSER 


READSKP 


WRITE 


EVICT 


REWIND 


WRITEC 


FILEB 


REWRITE 


WRITETN 


FILEC 


REURITEF 


liiRITEF 


LABEL 


REWRITER 


WRITER 


OPEN 


RFILE8 


WRITIN 


POSMF 


RFILEC 


URITOUT 


READ ■/ 


RPHR 




READC • 


SKIPB 





Record Manager Internal Text: RMCOM 

Contains macro-i microi and symbol definitions used within 
Record Manager modules- 

Installation Parameters: IPARAMS 

Contains installation parameters as symbol and micro definitions 
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Loader Request Macros: LflACOfl w**' 

Contains two macros: LOADER and LDREfi. 

Permanent File Macros: PFCOM 

PURGE 

RENAME 

SETP 

Peripheral Processor System Definitions: PPSYS 

Contains many system symbols and microsi and the following macros: 



ALTER 


EXTEND 


ATTACH 


FDB 


CATALOG 


PERM 



ADK 
BIT 
CEflU 
CMICRO 



CRI 
ENfl 

J08CARD 
LDCA 



Integrated Scheduler Macros: SCHCOfl 



CISO 

ENTRY3H 
LDW 



SCHLOK 
SCHSAVE 



LDK 

PPENTRY 
S8K 
UJ< 



SCHSTOR 

STREfl 



Indexed Sequential Interface Macros: SISICOM 



ACCESSK 

ACCESSN 

DELETE 

FORCEU 

INSERT 

OPENNEU 



OPENOLD 

REPLACE 

REPOS 

SEEKL 

SEEKS 

SETBLKD 



SETBLKI 

SETCOLL 

SETERR 

SETFET 

SETKEY 

TERMNAT 



Record Manager Definitions: 



bRncort 



Contains macro-i micro-t and symbol definitions for user programs 
that use the Record Manager. 
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TEXT OVERLAYS 



The SCOPE system text overlays contain various combinations of the 
come. or. decks-, as shown below: 



CPCTEXT 

IOTEXT 

IPTEXT 

LDRTEXT 

PFMTEXT 

PPTEXT 

SCHTEXT 

SCPTEXT 
SYSTEXT 



TXTbRM 



System text for central processor programs using CPC. 
Common decks ACTC0M-, CPSYS-. and SISICOM . 

System text for central processor programs using Record 
Manager. Common decks ACTCOM and bRMCOM. 

Installation parameter system text. Contains a single 
macro i IPARAMS-. whose body is the IPARAMS common deck. 

System text for central processor programs using Loader. 
Common deck LMACOM- 

System text for central processor programs using per- 
manent files- Common deck PFCOM. 

System text for peripheral processor programs. Common 
deck PPSYS. 

System text for central and peripheral processor programs 
interfacing with the Integrated Scheduler. Common deck 
SCHCO-fl. 

System text for central and peripheral processor programs 
in SCOPE. Common decks ACTC0M-. CPSYS-. and PPSYS. 

System text for central processor programs. This is the 
default system text used by COMPASS when no S or G 
parameters &r^ specified- It can be identical to either- 
CPCTEXT or IOTEXTi at installation option- In the re- 
leased systemi SYSTEXT is equal to IOTEXT. 

System text for Record Manager modules. Common decks 
ACTCOM and RMCOM. 



In addition to the above system texts provided by SCOPE-, the follow- 
ing system texts- are provided by product set members. 

ALGTEXT Contains COMPASS coded macros used to expand applica- 
tion areas of ALGOL-bQ*. 

FTNMAC Contains macros used by COMPASS object programs produced 
by the FORTRAN Extended compiler -CFTN}. 

SMTEXT Contains macros for central processor programs that call 
the SORT/MERGE system. 
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PP PROGRAM NAME RESERVATIONS 



Routine Name 


Description 


At 


Stack processor segment 


ABS 


Dump CM — absolute address 


ACE 


Advance control card 


ACT 


Helper for program ACCOUNT 


ADS 


ADDSET processor — add member to PF set 


AUX 


Utility helper 


CCP 


7000 station routine 


CEA 


Deadstart PPO save program 


CED 


Deadstart PP control program 


CEJ 


MTS coldstart bootstrap 


CEM 


Central error manager for ECS 


CEY 


MTS coldstart bootstrap 


CIO 


Circular I/O processor 


CKP 


Saves information necessary to restart a checkpoint job 


CLO 


Dummy program used to cail CIO 


COM 


Deadstart option matrix 


CON 


INTERCOM connect file to remote terminal 


CP1 


C.E. 415 card punch test 


CR1 


C.E. 405 card reader test 


CY1 


Resets FNT of file being processed by restart 


Dt 


Deadstart dump 


D00 


Diagnostic for COBOL 


DF4 


C.E.-3234 test 


DF7 


C.E.-3553 test 


DF8 


C.E.-808 test 


DIS 


Console display program for a control point 


OLE 


C.E. diagnostics 


DLM 


DELSET processor — delete member from PF set 


DM? 


Dump CM 


DMT 


Deadstart dump for 60x, 65x drivers 


DSD 


System display 


DSM 


Dismount pack 


DSP 


ROUTE/DISPOSE function processor 


DTS 


Deadstart dump for 66x drivers 


EKG 


Private pack closing 1EJ 


EPF 


Send audit information to CM 


ESB 


Reconfiguration cleanup 


EST 


Deadstart equipment configuration 


FAD 


INTERCOM 


FNT 


INTERCOM-FNT alter routine 


GBJ 


INTERCOM-274 Graphics begin job 


GEJ 


INTERCOM-274 Graphics end job 


GPF 


GETPF(MMF) 


HDS 


Help deadstart 


tZero-filled. 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 

Routine Name Description 

IAP INTERCOM initiate another program 

IEF Routine for CEFAP 

IRP Deadstart RMS stack processor 

IUP INTERCOM initiate user program 

J AC Job queue acquire information 

JDP Job dependency count decrementor 

LBL LABELMS header 

LDC LDCMR utility helper 

LDL Loader utility program 

LDV Loads CPU absolute overlays 

LDW Loads CPU absolute overlays in conjunction with LDV 

LOC Load octal corrections 

LPF In conjunction with LOADPF, reloads permanent files 

LPT C.E. 501 line printer test 

LP1 C.E. 512 line printer test 

MAC INTERCOM 

MDI Used by EDITLIB to handle I/O involved in changing and moving directory 

MDR Deadstart 66x driver 

MEM Process memory function 

MES INTERCOM writes messages to remote terminal 

MNT MOUNT processor 

MSD Direct Access Module of Record Manager 

MSG Issues dayfile messages 

MTR Monitor 

MTT C.E. 60X tape test 

MUJ INTERCOM multi-user job 

NSV PP helper for CPVSN processor 

OPE Dummy program used to call CIO 

P' Deadstart pte-addressed 6603 

PFA Permanent file manager ATTACH function 

PFC Permanent file manager CATALOG function 

PFD Attaches Permanent File Directory to control point 

PFE Permanent file manager EXTEND function 

PFP Permanent file manager PURGE function 

PFR Permanent file manager RENAME function 

PFS Permanent file manager POSITION function 

PPI Reserved 

PRM Permission checking function 

QAC I/O queue acquire file 

QAJ Reserved 

REQ Makes non-aEocatable device assignment and formats FNT entries for ailoeatable devices 

in response to REQUEST control card or a REQUEST macro call 

RMS Routine for CERMS 

RPV Reprieve central program 

RST Restores control point area of restart job 



fZero-filled 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 



Routine Name 



Description 



RWE 

SLT 

SPF 

SRB 

SSC 

SSF 

SSH 

STL 

STS 

TAT 

TBL 

TDR 

TDS 

TPF 

TFT 

T76 

Uxx 

VSM 

XDQ 

XRO 

nUx 

OZA-OZS 

OZT-OZZ 

0Z1-0Z9 

1AB 

1AJ 

1BR 

1BT 

ICC 

1CI 

1CL 

1CR 

1CS 

1CT 

1C9 

IDA 

IDF 

1DL 

1DM 

IDS 

1DU 

1FJ 

1EM 

lFC 

1GJ 

1GM 

1GR 

1IB 



INTERCOM Checks for INTERCOM job 

Reserved 

SAVEPF(MMF) 

Used by EDITLIB to complete the disk address of a record 

Sub-system call 

Sub-system function 

Station system helper 

Deadstart system execution PP resident 

Used by CP program to obtain certain status 

PF set table system access 

INTERCOM Get table 

Deadstart MT-NT tape driver 

Terminate deadstart 

Transfer permanent files and permanent file table 

Transfer permanent file tables 

INTERCOM 

Reserved for installations 

STIMULATOR routine 

PP portion of dump queue 

PP portion of restore queue 

Reserved for installations 

LCC drivers 

LCC initializer 

LCC drivers 

Identifies recovered jobs 

Advance job 

INTERCOM Buffer Manager 

Blank label tape routine 

ESP communication processor 

INTERCOM Queue Manager 

Close function for all non-tape or non-permanent files 

Tape read recovery - write CM for 9-track tapes 

Tape read recovery -» write CM for S tapes 

Tape read recovery - write CM for SCOPE tapes 

Write CM for tape read recovery - NT SCOPE tapes 

Process private packs 

Dump dayfile 

Overlay loader and dayfile message processor for DSD 

Device queue manager 

INTERCOM H-display 

DUMPF initialization 

End of job processor 

Formats hardware error message for stack processor 

Creates an RB entry for PFC 

INTERCOM 

Issues GOOD MORNING when time changes from 23.59 to 00.0Q 

INTERCOM 

Initiate batch job from input queue 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 
Routine Name Description 



1ID INTERCOM Send dayfiie message to tenninal, complete swap 

IIM INTERCOM Send message to terminal . 

1IQ Initiate JANUS control point 

II R Main JANUS routine; drives readers punches, printers, etc. 

IIS Initialize overlay setup 

II U Called by JANUS to backspace print file 

III INTERCOM Initialization 

1IT Integrated tape driver for (66x) main overlay 

HI INTERCOM Initialization 

1LX INTERCOM | 

IMF Multifile positioning routine 

1MH Tape scheduung/pfescheduling routine 

1MM Multi-mainframe job queue manager 

1MT Long record stranger tape driver 

INd Tape read recovery noise record verifier 

1NR NT read driver 

1NW NT write driver 

1N2 Tape noise record read recovery, read forward 1 

1N3 Tape noise record read recovery, read forward 2 

INS Notify station of SPOT completion 

10P File open routine for non-tape files 

IPC Close permanent file mass storage 

1PD Called by PFA to either enter event stack, call another PP routine, or swap out ..-^ 

■ 1PF Permanent file error recovery ) 

1PG PURGE(MMF) 

1PJ INTERCOM Process job card 

1PK PF set coordinator 

1PL Dummy plot program 

IPS 7000 Station routine 

iPT INTERCOM Low speed remote batch processor 

1P1 Tape recovery to LGR positioning driver 

IP2 Tape recovery write driver 

1P3 Tape recovery verification driver 

1P4 Tape recovery to LGNR positioning driver 

1QF I/O file manager 

1QM INTERCOM Check for MUJ swap-out completion 

1QP INTERCOM Quantum calculator and MUJ servicer 

IRC Restores field length of a checkpointed job 

1RN Ages queues, manages RBT chains and statuses tape drives 

1RP End of reel processor 

IRQ REQ overlay 

IRS Read stranger tape driver 

1RT Read SCOPE tape driver 

1 RV Tape I/O read recovery driver initializer and terminator 

IR2 Tape read recovery — tape parity error recovery 1 

1R3 Tape read recovery — tape parity error recovery 2 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 



Routine Name 



Description 



1R9 

1SI 

ISO 

ISP 

1SX 

1S5 

1TF 

1TJ 

1TO 

ITS 

1VG 

1WB 

1WI 

1WS 

1W9 

1XG 

1XP-6XP 

1ZA-1Z9 

2CC 

2CS 

2CU 

2GJ 

2IA 

2IB 

2IC 

2ID 

2IL 

210 

2IR 

2IS 

2IW 

2IY 

2IZ 

211 

2LP 

2ME 

2PA 

2PC 

2RC 

2RP 

2ST 

2TA 

2TB 

2TC 

2VJ 

2WB 



SCOPE tape 9 track (659) read tape driver 

Routine to swap-in or roll-in a job 

Swap-out or roll-out a job 

Mass Storage I/O processor (stack processor) 

Error message and abort function for stack processors 

Load and execute ISP or 3D0 at second entry 

Tape forward motion routine 

Translate job card 

Tape open routine 

Tape sampler 

STIMULATOR routine 

INTERCOM Wideband driver 

SCOPE internal tape write driver 

Stranger tape write driver 

SCOPE tape 9 track (659) write tape driver 

INTERCOM 1XP overlay used for graphics 

INTERCOM High speed EXPORT processor 

INTERCOM drivers 

1CI overlay — process command 

1CI overlay — create user table 

1CI overlay — create user table 

INTERCOM 

66k read driver for L tapes 

66k write driver for L tapes 

66k read driver for 7-track coded SCOPE tapes 

66k write driver for 7-track coded SCOPE tapes 

66x labels and tape module 

Submodule for 310 - 3IL 

66x basic read overlay 

Reservoir of routines for IIS 

66x basic write overlay 

Modified 2IW for station write 

Modified 2IR for station read 

INTERCOM overlay to 111 

3256/3659 driver for an on-line print file 

INTERCOM— Message sending routine 

PFA utility processor 

3446 card punch driver 

3447 card reader driver 

Overlay to lRP-End-of-reel processor 
MMF CIO staging processor 
Automatic tape assignment overlay 
All backward tape motion 
Extended trailer label group processor 
Translate job card 
INTERCOM overlay to 1WB 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 

Routine Name Description 

3 DO Initialize allocatable device file 

3IC 66x close processor 

3IE 66x basic error processor 

3IF 66x multi-file processor 

311 66~x system initialization 

3IL 66x label write processor 

3IM 66k message processor 

310 66x open processor 

3IP 66x positioning within a logical file 

3IR 66x read error recovery 

3IV 66x close volume processor 

3IW 66x write error recovery 

3IZ 66k station header and trailer label processor 

3LX INTERCOM Overlay to 1LX 

3ME INTERCOM Overlay to 2ME 

3PA PFA swapper status check segment 

3PM Segment of IP1 used for holding code for future use 

3P0 Segment of IPS that processes uncorrectable parity error GO or RECHECK code 

3PS Segment of IP4 used for holding code for future use 

3RQ REQ overlay containing 2TAC0M 

3SP Stack processor for 6603-1 driver 

3SQ Stack processor for 6638 driver 

3SS Stack processor for 854 driver 

3ST Stack processor for 6603-11 driver 

3SV Stack processor for 821 driver 

3SW Stack processor for 841 driver 

3SY Stack processor for 844 driver 

3TT INTERCOM Transmit data from CPU to terminal 

3T1-3T2 INTERCOM Overlays to 3TT 

3WB INTERCOM overlay to 1WB 

4AM ADSETT add murhber overlay 

4DO Process device independent requests for allocatable devices 

4ES Enter stack request 

4LB ANSI standard label processor 

4LC 3000 label processor 

4LX INTERCOM Overlay to 1LX 

4WB INTERCOM overlay to 1WB 

5CP IRP overlay - 6603-1 driver 

5CQ IRP overlay - 6638 driver 

5CS IRP overlay - 854 driver 

5CT IRP overlay - 6603-11 driver 

5CV IRP overlay - 821 driver 

5CW IRP overlay - 841 driver 

5CY IRP overlay - 844 driver 

5DA Initiate or destroy file on private pack 

51X INTERCOM overlay to 1IX 

5WB INTERCOM overlay to 1WB 

6BM Billing message overlay 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 



Routine Name 

6BR 
6BW 
6CR 
6CW 
6LC 
6LM 
j 6LX 
6L1 
6L2 
6L3 
6L4 
6L5 
6L7 
6MD 
6NO 

6PA 

6SI 

6RD 

6PM 

6WM 

7EC 

7ID 

7NO 

7RQ 

7SN 

7T1 

7T2 

7W1-7W2 

8AA-8A9 

88A-8B9 

8CA-8C9 
| 8DA 

8DB 
| 8DC 

8DD 

8DE 

8DF 

8DG 

8DH 

8DI 

8DJ 

SDK 

8DL 

8DM 

8DN 

8DO 

8DP 

8DQ 



Description 

ANSI label processor read function code overlay 

4LB overlay 

3000 label processor read function code overlay 

3000 label processor write function code overlay 

Segment of 4LB or 4LC to load conversion table into MMTC 

Segment of 4LB used to construct tape label messages 

INTERCOM overlay to 1LX 

4LB overlay to convert PRU count 

BCD conversion table overlay for 4LB 

4LB overlay to check that proper conversion table is in the MMTC 

4LB overlay for debug message writer 

4LB overlay to format the label information 

4LB overlay to pack and write label to tapes table 

Dummy EDITLIB overlay 

Tape error recovery debug segment assembled to give more detail about segment being 

read by 1NO 

Prints system bulletin before header 

Process swap-in parity errors 

Disposed file accounting overlay 

Permanent file accounting overlay 

Outputs dayfile error messages for I/O requests 

Generate ECS buffers 

Auxiliary error processor for RMS I/O 

Debug routine 

REQ Set Processor 

1AJ Set Processor 

ASCII/Display code conversion table 

EBCDIC/Display code conversion table 

Overlay for 6WM 

Reserved 

Reserved 

C.E. Reserved names 

A, I, J display overlay for DSD (dayfile buffers, REQUEST cards, JANUS) 

B display overlay for DSD (control point status) 

C, D, G display overlay for DSD (central memory) 

Reserved for DSD 

E display overlay for DSD (equipment status table) 

F display overlay for DSD (file name table) 

Reserved for DSD 

H display for DSD (I/O queues) 

Reserved for DSD 

Reserved for DSD 

K display overlay for DSD (pointers and control point area) 

L display overlay for DSD (central programmable) 

M display overlay for DSD (PP communications area) 

N display overlay for DSD (Breakpoint) 

O display overlay for DSD (operator message) 

P display overlay for DSD (tapes table and VSN previewing) 

Q display overlay for DSD (INTERCOM status) 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 



Routine Name 



Description 



8DR 

8DS 

8DT 

8DU 

8DV 

8DW 

8DX 

8DY 

8DZ 

8D0-8D4 

8EA-8E4 

8FA-SPS 

8GO 

8NO 

8FT 

8PU-8W9 

8T3 

8XA 

8XB 

8XC 

8XD 

8XE 

8XF 

8XG 

8XH 

8X1 

8XJ 

8XK 

8XL 

8XM 

8XN 

8X0 

8XP 

8XQ 

8XR 

8XS 

8XT 

8XU 

8XV' 

8XW 

8XX-8X7 

8X8 

8X9 

8YA-8Y9 

8ZA-8Z9 

9AA-9PS 

9PT 

9PU-9Y9 

9ZA-9Z9 



R display overlay for DSD (IDT tables and queues) 

S display overlay for DSD (job control area) 

T display overlay for DSD (transfer status-linked mainframe) 

U display overlay for DSD (ID table) 

V display overlay for DSD (RMS) 

W display overlay for DSD (pack requests) 
X display overlay for DSD (ECS memory) 

Y display overlay for DSD (command format dictionary) 
Z display overlay for DSD (display dictionary) 

DSD 

DSD (linked mainframe displays) 

Reserved 

Loaded by 1R3 when GO or DROP operator decision necessary during tape processing 

Segment to 1N3 that writes debug messages to dayfile if IP-DBUG 38 ! 

INTERCOM Overlay to 1PT 

Reserved 

Overlay to load MMTC memory 

Channel commands overlay for DSD 

Debugging commands overlay for DSD 

PPU calling control points requests commands overlay for DSD 

Equipment status commands overlay for DSD 

Control point commands overlay for DSD 

Deadstart commands overlay for DSD 

Priority and tape staging job control commands overlay for DSD 

INTERCOM commands for DSD 

Miscellaneous commands overlay for DSD 

Miscellaneous commands overlay for DSD 

Tape scheduling commands overlay for DSD 

Operator action manager commands overlay for DSD 

Error flag commands overlay for DSD 

CP-PP interlock commands overlay for DSD 

Initiate system jobs command overlay for DSD 

Tape assignment command overlay for DSD 

Bring up displays command overlay for DSD 

Divert a file command overlay for DSD 

Segment debug command overlay for DSD 

Segment debug command overlay for DSD 

RMS commands for DSD 

Logical ED command overlay for DSD 

ENID command overlay for DSD 

Reserved for DSD 

DSD command syntax table 

Reserved for DSD 

DSD (Linked mainframe commands) 

INTERCOM PP drivers 

Customer Engineering 

INTERCOM 

Customer Engineering 

INTERCOM 
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STUDY QUESTIONS 
Coding Conventions - Section VI 

1- D<RA is a system symbol which defines 



2« U«PPf1ES l 4 is a system symbol which defines 
3- fUDPP is a system symbol which . .■ 



H- P-LIB is a to the Library in SCOPE. 

5« B.FL is a storage location in the PP which contains the Feild 
length of the job which requested the PP. 

•CAJ True 
-CB> False 

b« A system text is a source file for COflPASS* 

•CA> True 

■CBJ- False 

?. System Texts contain 

■CA> MACROS 

■CB> MICROS 

■CO Commonly used symbols 

•CD} All of the above 

■CE> None of the above 

fi- System texts may be listed- 

■CAJ True 
■CB3- False 

H' PP program names may begin with ..■..- .-.-■. -■ - *' 



10- PP Program names generally indicate 
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STUDY QUESTIONS 
Coding Conventions - Section VI 



1- D-RA is a system symbol which defines <3 cL+r-C&T C<e*/f / *» J t rr 

E« U-PPMES4 is a system symbol which defines <3 S>?eSSc?4<e. btCTTe* - 

3- M-DPP is a system symbol which H> *t£ g £ *c( <e 4or* P*V»p rf 

i*. P- LIB is a Polnfa.!" t o the Library in SCOPE- 

5- |.FL is a storage location in the PP which contains the Feild 
length of the job which requested the PP» 



4AJ) True • 

•CB> False 

t,. A system text is a source file for COMPASS- 

(0Sy True 

-CB3" Falsa 

?• System Texts contain 

-CA* MACROS 
■CB> MICROS 

{£L Commonly used symbols 
QJV All of the above 
iE> None of the above 

S» System texts may be listed- 

CX&k5 True 

if} False 

«?. PP program names may begin with &*** d,jph&- C*k&K 
ID- PP Program names generally indicate ot}*iG>***- ' **•*> 
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PP MACROS 
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PP MACROS 
Lesson Guide 

REFERENCES: 

PP COMPASS Student Guide Section VII 

TRAINING AIDS: 

Visuals VALS-S3-7-5 

ASSIGNMENTS: 

Study Questions Section VII 

OBJECTIVES: 

-C1J To present the MACROvas a time savingn error reducing 

programming aid- 
CHI To present pre-defined programming concepts using MACROS' 
-C33- To introduce generalized coding techniques* 
■Cm To prepare student to write simple PP Macros- 
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PP MACROS 
Lesson Oultine 



VII- 



PP MACROS 
A' 



Definition 

o Pre-defined sequence of code 

o 



Generalized code 



So 


urce 





SCPTEXT 





PPTEXT 





Your Code 


Fu 


net ions 





PPENTRY 





ENM 





UJK 





LDCA 





CRI 





BIT 





UK 





ADK 





SBK 



Sets up entry 

Standard subroutine entry 

Unconditional Jump 

Load central address 

Central Read Indirect 

Generate Symbol with Bit 

Load Constant 

Add Constant 

Subtract Constant 
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SCPTEXT MACROS 



PPENTRY Hacro 

Used as first instruction following ORG in a primary level over- 
lay- PPENTRY generates code to set up low core parameter as 
follows: 



D.PPIRB through D.PPIRB+4 
D.CPAD 

D.RA — • — J ~ i - 

D.FL .. .-.'• •'- 



Input register contents 
Control point address 
Reference address/lQOB 
Field length/100B 



Address field of the .PPENTRY macro should contain; 
D.TD. 



D-PPIRBi 



C&do.*- 



LOO O.PPIR 

i ! - v 'CRO'""S""" i ■■""-""' rj " 

IFEO TtQ.Tfl 

— -R-vJM -flhr* ft-PL—< - 

ELSE 



-£RR -W»«J»e-e^L- L -c F ~O R 



ENOIF 

-OP,pg j oy. i 



-YuS^Q. cu RrWL'u P&uo dU^-& 
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FNfl nacro " . '■'■""•■' 

Generates standard subroutine entry anti exit lines- The name 
of the subroutine is that declared in location field of ENfU. 
the subroutine may be entered by an RJN to that name. If 
address field of ENH is blank-, no exit symbol is defined; othu.-- 
wise-* contents of address field are appended to location symbo. 
to generate subroutine exit symbol. -C ypically-r address field 
contains only an x> An exit from subroutine may then be made 
by jumping directly to the generated symbol* 



Qjodo. z 



MACRO cMM, M,X 



NfX LJM 



i-F6P-i- 

~LJM 



< ^GA. a^cu>,-\\^ilbu Qyo »pJLt& OQOJL 
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HOtf TO GET IN AMD OUT OF A SUBROUTINE 



RJM 



SUB 



SUB EM X generates: \SUBX 

SUB 



OlOO 



0000 



LJM SU3X 



2. 



RJM SU 



B 



SUBX LJM 
SUB EQU 



* * 

* 



-1 f 



LJSA SUBX 



put tag SUB 

on second word 

of LJM instruct i os 
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/ 






UJK Macro 

Generates UJM or LJfl instruction! depending on length of jump. 
In general i the iumo must be backward i since symbols used in 
address fieldfPust have seen previously defined, nacro is 
usefu l fo r exiting From small .subroutines subject to expansion. 



-^£FbT-- s -~P- r Mr3T-2- 
UJN P 

— f^e^v— j _*- 

LJM P 

iffi lK — *»* iS j* ' ■"■■'■" "'■■•fj- i 1 ^- -"" 



O^a 



1/ nrcvoJtafl-a cu 



txo^r^JUi UAK SuUX 



LPCA flacro ' "" . . 

Load PP A register with absolute la-bit central address. Re- 
lative CH address is obtained from two consecutive PP low core 
locations-i the first of which is specified in address field of 
LBCA macro i CH address is assumed to be right justified within 
these two words. Contents of D.RA are added to Cft address. 
flacro is useful for loading many different Crt addresses. Space 
may be conserved by using a subroutine rather than a macro if 
the same address is to be loaded three or more times. 



Q#U> 



LOO A 



SHM 6 



SHN 6 

OO-flH-J- 



-Lnra pwnw 



<L*Oav~£L&2S 



U"bah 



u.IM 
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CRT Macro l * QaAvDuai ^s.o.A <*$ /y^Li^A/d; 

Reads contents of a CD word the address of which is contained 
in a central niemary painter* Address field of CRI macro con- 
tains Xt Yi and Z subfieldst in that order. 

X t-bit cn pointer word address 

Y First of five PP low core cells which will contain the 
desired Cf1 word. 

Z Byte within Cfl pointer word containing 12-bit CM address 
of desired word* 



CodU: 



CRT MACRO X,Y,Z 
CRO Y 



CRO Y 

-^>-p-t- fTKn-M— 



CfcT . P.. EST, X.TO , O 
°|W Iowa- 'uhS»vd o£ ^FST uhJZi JU.^<xdl i>U 

4§u* <xxAJLKfu-6 *^ T. £ ST* -Xw^ r\ 
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BIT nacro 

Generates no code? merely defines a symbol in the location fields 
Value assigned to symbol is a 1-bit mask where the bit is 
positioned according to the value of address field* Bits aro 
counted from right to left-» beginning ur.th zero* thus i . the 
statement "ASK BIT 2 would set fiASK equal to M« nacro is 
useful for generating 1-bit flag values with the S-x SCPTEXT 
symbols* 



ej&dbj.; 



-HAC-??Q--?-S-T- r fc r ¥- 

R SET i 
—— G U* 5 — V-rl- — '■.-n.vni, 

R SET Rh* 



ErampXe : 

MASK BIT 2 

gererates a constant 

called MASK containing a bit 

in bit position 2. Same as; 



MASK SET 



LPK nacro 

Generates LDN-j LDC-j'or LCN instruction depending on size of 
its argumenti which may be any valid address expression* This 
were is recommended for referencing SCPTEXT symbols for Cfl 
pointer words- 



-i^35$-WAC-^0— A- 



LOCAL X 
X SET A 



— HE *U-T— ->*-,- <W-3* 
X SET -y 



-€-*H,-T— : -rHHi-fH-2- 
LCN X, 



1FCP, U 

-I-FL-T->Vi-5?B-,-2- 
tQN X 



IFD Ef.'OIF 



JL'W 



?-a 



ADK Hacro 

Generates ADNi'ADCi S3.Ni or no code depending on size of its 
argumentn which may be an address expression. This macro is 
recommended far referencing SCP7EXT symbols for control point 
additives -CU.X symbols}. 



(Wt: 



-A-OH-^tA-G-f^e— A- 



LOCAL X 

j-F—^SF-rA- 
X S£T A 

~- iflt y,a,3 
X S€T -:< 



IFCP tr 

- IFLT -j f-HrM-Brg- 
IFN€ <,0,1 
-A-3N— * — — 



, IFCP .'! 



AOC A 



SB< flacro 

Generates SBN c>r ADC depending on' size of its argument. All 
symbols in its argument must be defined. 



Cfie* 



oa\ 



SDK M/Tf;>o A=?G 



con sn /kg 

-I-F—DE-^i A? J G-, ~- 



IR.T* ro?i,icao,2 

•S3N--C 6ff -~— 

IFCP 1 
"A-t K CC-'J 



JF, MHm __ 

"* - — ■ — L 
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STUDY QUESTIONS 
PP MACROS - Section VII 

1. A MACRO is 

■Ca> a subroutine 

■Cb> a system entry point. 

■Cc> a function 

■CdJ a pre-defined sequence of code 

g. The PPENTRY Macron generally used as the first executable code 
of a PP Prograraiis used to ■ , . .. . . , . . • 

3- flay a Macro be used in a subroutine? 

■Ca> Yes 
•Cb> No 

4- May a Macro be used in another Macro? 

-Ca> Yes 

■Cb> No 

5- Using MACROS generally means less coding- 

■CaJ True 
•Cb> False 

ta« MACROS usually indicates more efficient coding- 
■Ca> True 
■Cb-F False 

?• Macros may not use system symbols- 
■Ca> True 
•CbJ False 

a- A Macro may generate no machine code- 
-Ca> True 
•Cb> False 

T- Give an example of a Macro generating a label- 



10- Write a Macro named CPNO which will 

•Ca> Obtain the control point number of the job which called the 

PP Program 
ib> Store the control point no in any PP memory location- 
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STUDY QUESTIONS 
PP MACROS - Section VII 

A MACRO is 

■Ca> a subroutine 
-Cb> a system entry point 
-Cc> a function 
£td^) a pre-defined sequence of code 

The PPENTRY Macro-? generally used .as the first executable code . 

of a PP Prograimis used to )»»/ ~t ; g hi «e^ J&^-ey^a^ I CLi rm*- *- /»ua/// 

3» May a Macro be used in a subroutine? 
(£a}} Yes 
-Cb> No 

4 * Mav a M , ae ro be used in another Macrof 
CSpYes 

-Cb> No 

5* Using MACROS generally means less coding - 
<^Ca^ True 
ibJ False 

k- MACROS usually indicates more efficient coding- 
^aj p True 
•Cb3- False 

7- Macros may not use system symbols* 
-CaJ True 
CiSS False . 

a* A Macro may generate no machine code- 
(j*& True 
Cb> False 

T* Give an example of a Macro generating a label* 

ID- Urite a Macro named CPNO which will 

■Ca> Obtain the control point number of the job which called the 

PP Program 
Cb> Store the control point no in any PP memory location* 
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SYSTEM TABLES and POINTERS 
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SYSTEM TABLES AND POINTERS 
Lesson Guide 

REFERENCES: 

PP COMPASS Student Guide Section VIII 

System Programmers Reference 

TRAINING AIDS: 

Visuals VALS-53-3-3 thru VALS-53-fl-lQ-i VALS-S3-S-15 thru 
VALS-S3-fl-m 
ASSIGNMENTS: 

Study Questions Section VIII 

OBJECTIVES: 

■Cl> To present the necessary source information for coding 
system PP Programs* 

■C2J To present the normal methods of information exchange 
between user programs and system PP programs- 

-C33- To define a technique where the information desired by 
the PP programmer can be located although it may not be 
specifically described- 
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SYSTEM TABLES AND POINTERS 

Lesson Outline 

VIII- SYSTEM TABLES AND POINTERS 

A-- CUR Summary 
o Pointers 
o Relocatable Tables 
o Fixed Table Areas 
o High Core Tables 

B- Control Point Area -C2DQ octal words} 
o Exchange Package 
o Accounting Information 
o Day file message 
o Control Card Buffer 
o Installation Parameter 

C* System Exchange Package 

o Next active control point 
o To MTRRS - CPMTR Request 
o CP idle program-Cs* 

D- PP Communication 

o PP Communication area definition 

o PP Communication Area tables 

o Communication word of tables -CU»PPMES3> 

E* RA Communication Area 

o RA + Q - Hardware Flags 

o RA + 1 - User/System Interface 

o Parameters! 

o Control Card Image 
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CENTRAL MEMORY RESIDENT 






Pointer* 


100 


Channel Status Table 


154 


PP Status Word* 


200 T.CPA„ 


Control Point Anas 


T.XPIOLA 


System Exchange Packages 


T.PPC n 


PP Communication Areas 


* T.EST 


Equipment Status Table 


• T.FNT 


File Name Table 




CJO-CPCIO Special FNTs 




Permanent File FNTs 


♦ T.1TABL 


INTERCOM Table 


• T.OAT 


Device Activity Table 


* T.RMSaUF 


RMS Suffer 


• T.STG 


Tape Staging Table 


* T.APF 


Attached Permanent File Table 


* T.RGS 


Request Stack 


T.RBR 


Record Slock Reservation Table (Headers) 


T.RBR8IT 


RBR Sit Table 


T.DST 


Device Status Table 


T.DPT 


Device Pool Table 


T.SEQ 


Sequencer Table 


T.RMS 


Rotating Mass Storage Diagnostic Table 


T.JNS 


Installation Area 


T.MST 


Mourned Set Table 


T.DDT 


Dismounted Device Table 


T.VSNSUF 


VSN Suffer 


T.TAPES 


Tapes Tablet 


T.MAIL 


Scheduler Mailbox Suffer 


T.IOt 


Logical ID Table 


T.DF8 


Dayf tie Buffers 


T.PJT 


Parameter Storage for Delayed PP Jobs 


T.SCMPT 


(Optional) Scheduler Statistics 


T.SCHJCA 


Scheduler Job Control Area 


TJ3GHJDT 


Scheduler Job Descriptor Table 


T.SGFAP 


CPMTR CEFAP Buffer 


T.5PAG6 


Empty Page Stack 



ECS Parameters 

Subpage Buffer 

Description of T.EBUF Area 

MoveBuffer for RMS-6CS Trans/or 

PP Resident Overlay Save Suffer 

Breakpoint Table (ECS System) 

Area Table (ECS System) 

Entry Table (ECS System 1 

CM Resident Programs (Disk System) 

Segmented System Areas (ECS System) 

Library Directory 

INTERCOM Pointer Area 

INTERCOM Smalt Buffers and User Table* 



(Job control point user field length) 
T.RBT RBT Chains 



T.ECSPRM 

T.SUBPG 

T.ECTL 

T.EBUF 

T.PPOVL 

T.BRKPT 

T.AREA 

T.ENTRY 



T.UB 



'Table Must Begin Before 100008 
tTaole Must Begin Before 200008 
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CMR POINTER AREA 



P.ZERO 



P.LI8 



P.R8R 
R.R8T 
R.CMLWA 

P.NPP 
P.NCP 
P.DFB 

P.SEQ 
P.FNT 
P.HEC 

P.CST 

P.PCOM 

P.6ST 



P.PFM1 

P.MST 
P. DDT 
P.DSMQ 

P.INS 

P.S1RPR 

P.ELBST 

P.ROS 

P.DPT 
P.TAPES 
P. RMS 

P.STG 
P. INT 



59 


47 




3S 


29 


23 




11 


Zeros 


C.OIRFWA 

I . FWA of Library 
A j I Directory 




LWA+1 
Library Directory 


C.DSFLAG 
Oeadstart 
Load Flag 


C.RBRAO 

| FWA of RBR Area 


c.RBtec 

R8T Ordinal 
of Empty Chain 


Length/10138 of 
R ST Area 


C.CMLWA 
(LWA+1 )/1008 
of CM 


FWA/108 
of Dayfils Buffer 


(Reserved) 


C.NPP 

No.ofPPs 


C.NCP 

No. of CPs 


C.FNT 

FWAof 
FNT 


C.FNTIWA 
LWA+1 of 
FNT 


C.SEQ 

T-SEOVIOB 


C.SEQL 

L.SEQ 


C.HEC 

Hardware 
Error Count 


cSst" 

FWAof 

EST 


LWA+1 of 

EST 


COST 

FWA of CST 


C.CSTL 
LWA+1 of 
CST 


C.PC0M 

Address of 
Comm Area PP1 


C.PFMOVE 


C.APFL' 

No. of APF 
Entries 




C.APF 

FWA Of APF 


C.PFMCH 

Interlock 
Byte 


COSMO 

(Reserved) 


C.NDDT 

L.DDT 


COOT 

T.DDT/108 


C.NMST 

LJWST 


CMST 

T.MST/108 


(Reserved for Installations) 


C.LEPAGE 
L.ECSTK+1 




C.ECSPRM 
T.ECSPRM 


ICC Area Address 


Maximum Length/ 

10008 of ECS 

Library File 


ECS Flaw Table Address 


ECS Page Stack Address 


C.DAT 

T.DAT 


C.DATL 

L.DAT 


C.ROSFS 
FWA/2 of 
Request Stack 




No. of 
DST 

Entries 


FWA/108 
of DST 


CTAPES 
T.TAPES/10B 


L.TAPES 


C.RMS 

T.RMS/108 


C.RMSL 

L.RMS 


C.DPT 

T.DPT/108 




C.STG 

T.STG 


Cjnt/c.IFL 
(LWA+D/1S08 
of INTERCOM 


C.iTABL 

FWAof 
Multiplexer Table 


C.IBUFF FWA of INTERCOM 
. . Pointerand 
N Buffer Area 


C.ILTA8L 
Length of 

Multiplexer Table 


(Reserved) 



2 

3 



10 



11 



12 



13 



14 



15 



16 



17 






( :: 
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NOTES: CMR POINTER AREA (CONT'D) 
59 47 41 



35 



23 



17 



11 



T.J DATE 



P.NRBR 



T.BJOT 

P.EVlCT 
P.RMSBUF 
P.SYR 8T 

P.CMFL 



T.CPJOBN \ 
P.PJT [ 

P.SPOROPJ 

T.EPBL I 
P.ECSFL J 



T.CLK 

T.SUAB1 
T.DATE 

T.SLAB2 
T.SLAS3 
T.SLAB4 
T.SLAB5 
T.SLAB6 
T.MSP 



{Leading Zeros) 



C.N RQS Number 
of Request Stack 
Entries 



Ordinal Oats in 
Binary {YYDDO) 



G.N R BR 
Number of 
RBR Headers 



C.LRBR 



Reserved 



Size of Total 
RBR Area 



Time in Binary 
(HHMMSS) 



C.RMSSUF 

T.RMS8UF 

FWAof RMS8UF 



Trace Buffer 
T.TRB/10B 



Machine 
FL/100B 



A S 


Y . S 


T E 


M A 


A A 


Job Sequence 
Number 


G.SPDROP 
DST Ordinal 
for ISP Drop 


Job Count 


CPJTFWA 
T.PJT/10B 


C.PJTLWA 

T.PJT/108+ 

L.PJT/108 


C.ECSPL 

ECS Page Length 


C.ECSBL. 

ECS Buffer Length 


C.CPECFL 

Machine 

ECSFL/1000B 


H H . M M . S S 


MM/ D / Y Y 




System Label 

SCOPE 

Version 

3.4 






















Debugger 


Step Flag 



20 



21 



22 



23 



24 



25 



26 



27 



30 



31 



32 



33 



34 



35 



36 



37 



IM-6 



fl-S 
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59 47 . 35 



23 



11 



T.MSC 



P.CHRQ 



P.PPUB 



P.VRNBUF 



T.CPSTA 



T.CPSTB 



T.MXNCTL 



T.PP1D 



T.PPIP 



T.CMPID 



Count of PP 

Job Queue 

Entries 



Number of 
IdlePPs 



Number of Seconds*4096 



Position of CIO 



C.VRNFWA 
T.VRNBUF/1G8 



T.SPF 







C.VRNFIN 
Pointer to 
First VSN 



Idle Exchange 
Package Address 



Number of 
Programs 



C.STGFLG 

Stage 
ON/OFF 



Next Slice Time 



C.CHRQ 

First 10 

Channels 



C.CHRQ2 

Second 10 

Channels 



Address of 
First Entry 



C.VRNINT 

Buffer 

Interlock 



2 



C.VRNFUL 

Buffer Full 

Flag 



Active XP Address 



44 



: P 



STL Code 



20 



Active XP Address 



6 1 P 



2 6 



PP Input 
Register Address 



PP Input 
Register Address 



Computer !D for ECS Partitioning 



(Reserved) 



C.SNTLWA 
Length of Spot 
Name Table 



C.SNTFWA 
FWA of Spot 
Name Table 



C.CPN 

Station Control 53 

Point Number 



40 



41 



42 



43 




JOS MODE 
Rescheduling 



OFF 



50 



51 



52 



(Reserved) 



T.RCHN 



T.CPT1 1 
T.UAS ' 

T.ECSPAR 
P.EPAGE 



SPM-1 RN Communications Word 



Unassigned 
CM/ 1008 



Unassigned 
ECS/ 10008 



CEP AGE 
T.EPAGE 



ECS Size 



ECS Flaw 
Table Flag 



First R8T 
Word Pair 
to Release 



Initial CP1V1TR 
Address 



ECS Parity 

Flag 



ECS Parity 
Address/ 10008 



54 



55 



56 



57 



MAN 



L = 



4 Turned Off 
I 1 Locked Off 



P = 



, CPUA 
I 1 CPU8 
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CONTROL POINT AREA 



59 



47 44 41 



35 



29 



23 



17 



11 



W.CPAn 

W.CPSL1C 
W.GPUST 
W.CPLINKJ 

W.CPTIME 



W.CPTIMB 

W.PPTIME 
W.CPPTM 

W.CPSTAT 

W.CPFL 

W.CPEP 

W.CPJNAM 



W.CPCC 



W.CPECS 



i 



Exchange Package 



1! 



C.CPSTAT 
Status Byte 



C.CPSLIC 
M.RCLCP 

Time 



C.CPUQS CCPUQMS 

CPU-A Seconds*4096 
This Quantum 



C.CPUQS C.CPUQMS 

CPU-8 Seconds*4096 
This Quantum 



C.CPPQS C.CPPQMS 

PP Seconds*4096 

This Quantum 



C.CPM6MO 
Error Memo 



C.CPEF 
Error Flag 



C.CPUPRI 
C.CPUNK 
I 



Next Active 
Control Point 



C.CPUAS 
Total CPU-A Time as Number of Seconds* 4096 



C.CPUSS 
Total CPU-B Time as Number of SeeQnds*4096 



C.CPPTS 

Total PP Time as Number of Seconds*4096 



C.CPSM 
Storage Move 



C.CPRA 

RA/100B 



CCPJNAM 



Job Name 



C.CPRPV 

Reprieve 

CKSM Value 



C.CPRPA 



Reprieve Address 



C.CPNFL 

Nominal 

FL/1008 



C.CPECRA 
ECS RA/1000B 



C.CPFL 
FU1Q0B 



JDT 
Ordinal 



C.CPNCSP 
Next Control 
Card Pointer 



CCPECFL 
ECS FL/1000B 



W.CPDFM -^ 

W.CPPRI 

W.CPJCP 

W.CPTIML 

W.CP10L 

W.CPSWP 

WXPINT 



Last Dayfile Message 



W.CPSCH 1 
W.CPRO I 

W.SSW \ 
W.CPSSW I 

W.CPMST 
W.CPCSF 
W.CPACS 
W.CPACSE 



C.GPTIML C.CPI0L 

Current Time 
Limit (15 Bits) 



10 Time 
Limit (15 Bits) 



C.CPQNT 



Quantum 



C.CPFLG 
Swap Flags 



Saved SPOT 
Error Flags 



C.CPJQP 

Job Queue 

Priority 



C.CPPR1 

Job Qass 



C.CPECSI 
Initial ECS 
FL/10008 



C.CPUTA 



User Table 
Address 



C.CPRFL 
Reserved FL 



C.CPFLI 
Initial 

FL/100B 



C.CPORG 
CCPEVNT j^ 
Flags | Origin 



C.CPJDA 



JDT Address 
(Absolute) 



Reserved 



C.CPSSW 

Sense 
Switches 



C.CPMST 
Setname MST 
Ordinal 



Core Seconds Factor (Floatingpoint) 



(Reserved) Accumulated CM Core Seconds (Integer) 



(Reserved) Accumulated ECS Core Seconds (Integer) 



17 
20 

21 

22 
23 
24 
25 
28 

27 

30 

37 
40 

41 

42 

43 



45 



46 



47 



A if set, do not update exchange package ECS RA and FL 
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35 



W.CPFACT 

W.CPFST 
W.FSTCC 

W.CKP 

W.CPCKP 

W.CPlO 

W.CPOA6 



W.CPVRNO 
W.CPLDR1 

W.CPLDR2 

W.CPLDR3 

W.CPAR 

W.CPIOQ 

W.CPTAPE 

W.CPSTG 

W.CPOFMC 

W.CP-DPV 

W.CPDSMO 

W.CPIR8 

W.CPFP 

W.CPOUT 

W.CPFLAG 

W.CPERT 

W.CPMSLM 
W,CHTIM 

W.CPMSl 

W.CPSR 

W.CPCAF 

W.CPCAL 
W.CPINS 



23 



17 



11 



Account Parameter for Permanent Files 



FST Bntry for Next Control Card PRU 



C.CPDID C-CPSfO 

Destination 
ID 



C.CPREQ 
Req Flag 



Source 
ID 



Relative Address 
of Tape Label Information 



C.CPCON 
Console 
Checkpoint Flag 



C.CPCKP 

Number of 
Checkpoints 



C.CPOAE 
Equipment 
Assigned 



Family Pack VSN Assignment 
66x VSN Typerin 



C.CPLW 
C.CPLT 

Loader Flags 



Global Library 



Set 



Indicator 



RA+1 Contents (and Control Point Number 
of Last Auto-recall Request 



C.CPAR 



Reply Word Address 



C.CPTMT 
MT 



C.CPDFMC 
Day file 
Message Count 



C.CPFLAG 
Flags 



C.CPTNT 
NT 



C.CPDSMO 
Default Set 
MST Ordinal 



C.CPMSLM 

MS Limit in PRU's 



C.CPSITM 



Time of Swap-In 



C.CPSR 

Stack 
Requests 



C.CPIOO 



MST/PFC 
of Input File 



C.CPRBIO 
INTERCOM Batch 
Routing ID 



CCPFST 

FST Address 



C.CPMNT 
MT i NT 

Max I Max 



C.CPDPV 
Job Dependency 
ID 



C.CPFP 
CCPOUT 
Flags 



CCPMSMX C.CPMSRC 

Maximum PRU Count | Running PRO Count 



Channel Time as Number of Seconds*4096 



Start 
End 



50 



51 



52 



53 



54 



55 



56 



57 



50 



61 



62 



63 



64 



65 



66 



67 



Control Card Buffer 



t 



Reserved for Installations 



A S.YNRDY B S.YNN0 C Extended label format 



70 

167 
170 

177 



5" 



II-I-18 
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35 



23 



11 



P.SGH 


C.LEJDT 
LE.JDT 


C.SRS 
T.XPSCM/108 


C.JCA 
T.SCHJCA/108 


C.LJDT 
L.SCHJDT 


C.JDT 
T.SCHJDT'IOB 


60 


P.STR 


C.NFL 
Needed 
FL/100B 


C.JQP 

Queue Priority of 

Job in Counter 


C.RFL 
Reserved 
FL/100B 


C.RCL 
C.STMF 

SCH Rcscall 


C.AFL 
Available 
FL/1008 


61 


T.SCHCP 


Interlock Word (Scheduler) 


62 


T.SGHPP 


Interlock Word (PP Routines) 


63 




(Reserved) 


64 


P.MAIL \ 
P.SWPECSJ 
P.SCHPT j 


C.MAI LF 
T.MAIL/TOB 


C.MA1LL 
L.MAI L 


C.SWPECS 
L.ECSSWP 


C.SCHPT 
T.SCHPT/108 


C.ISI2LN 
• INTERCOM 
User Table 


65 


P.LNK ) 
P. IDT j 


C.ECSLNK 


(Reserved) 


C.LIDT 

Length of 
ID Table 


C.IDT 

T.1DT/10B 


66 


P.AREA ) 
P.ENTRY j 


FWA of Breakpoint 
Table T.BR KPT 


FWA of Entry 
Table T.ENTRY 


FWA of Area 
Table T.AREA 


67 


< 


a»» 


(Reserved) 


n 70-76 


P.PPOVL 




C.PPOVL 
T.PPOVL/108 


T.ELI8D 


77 



NOTES: CMR POINTER AREA (CONT'D) 



60 P.SCH 



61 



Contains information relative to the integrated scheduler. Pointer to job scheduler exchange package is in 
byte 1; a pointer to the job control area is in byte 2; length and pointer to the job description tabic is 
in bytes 3 and 4; length of job description table entries is in byte 0. 



P.STR 

Information relative to job scheduling. 
62 P.SCHCP 

interlock word for integrated scheduler. 
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SYSTEM JOB EXCHANGE PACKAGE AREA 
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47 



35 



29 



23 



17 14 



11 



T.XPSCH 

W.CPSLIC 
W.CPUST 
W.CPL1NK 

W.CPTtMg 

W.CPTIM8 

W.PPT1ME 

W.XPtR 

W.XPOR 

Scheduler Only 
T.SCHRS 

T.MTRRS 
T.XP IDt A 



W.CPSLIC 
W.CPUST 
WCPLINK 

W.CPT1M6 

W.CPT1MB 

W.PPTIME 
W.XPIR 

T.XPIDL8 



W.CPSLIC 
W.CPUST 
W.CPLINK 

W.CPTIME 
W.CPT1MB 
W.PPTIME 
W.XP1R 



Exchange Package 

for 

Scheduler and Storage Move 



C.CPSTAT 
Status Byte 



C.CPSLIC 

M.RCLCP 
Time 



C.CPUPRl 
C.CPLINK 



Next Active 
Control Point 



CPU-A Scheduler/Storage Move Time 



CPU-8 Scheduler/Storage Move Time 



PPU idle Time 



Scheduler Input Register 



Scheduler Output Register 



Scheduler Request Stack Table 



L.SCHRS=4 



CPMTR MTR Request Stack 



T~ 



L.MTRRS=4 

L 



CPU-A Idle Program Exchange Package 
P'CPMTR ilf IP.ECSB^O, 

PL =4000008 ECSFL=17?77777B 

82=1 'BS'L-ECSTK 

87=0 A6-T.EPAGEJ 



C.CPSTAT 
Status Byte 



ccpsmc 

M.RCLCP 
Time 



C.CPUPRl 
C.CPLINK 



Next Active 
Control Poinr 



CPU-A Idle Time 



Ilf IP.MCPU=2) CPU-B Idle Program Exchange Package 
P«CP.MTR (If IP.ECS8t=0, 

FL=4Q00008 ECS FL= 177777778 

82=1 85=L.ECSTK 

87=1 A6=T.EPAG£) 



C.CPSTAT 
Status Byte 



C.CPSLIC 
M.RCLCP 
Time 



C.CPUPRl 
C.CPLINK 



Next Active 
Control Point 



CPU-8 Idle Time 



t. 
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The PP Communications Area contains up to twenty S-word areas ■> one 
for each PP* through which the PPs communicate with each other. 

T.PPCX First word address of each area- 
■C where. X * li 2 •»...-. 20> 



^ 



y.ppiR 

U'.PPOR 



ti.ppnESx 

■Cwhere X * 
1 1 2i • • • it J" 



Uord - relative location of the PP input register 
within a PP communication area- 

Word 1 - relative location of the PP output register 
within PP communications area* For PPp- PP^ 
Byte contains a (1TR function code- 

bJ.PPflESx are the relative locations of the six words 
of the PP message buffer within a PP communication area- 
Each peripheral processor contains pointers to its 
Input-Register -i and Message Suffer in peripheral pro- 
cessor memory locations ?M and 7S-. respectively- The 
communication areas are used to provide a means of 
.communication between flTR and peripheral processor pro- 
grams- When a peripheral processor is idle-* its resi- 
dent program continuously scans its Input Register, 
iilhen flTR has a task for that processor-* it sets the 
name of the appropriate routine in the Input Register 
of the idle processor! which when it recognizes the 
requests loads the routine and executes it- 

NTR regularly scans the Output Register of each active 
peripheral processor. When a peripheral processor re- 
quires UTR assistance -Csuch as- for example-, reserving 
a data channel >t it places a code in its Output Register. 
flTR detects the request during its scan of the output 
registers and processes it- When the request has been 
processed i flTR clears the requesting processor's Output 
Register; this informs the requesting processor that 
the request has been processed- 

The six-word Message Buffer is used to pass parameters 
and messages between MTR and the peripheral processor 
resident programs- '' 



J 



■J 



a-n 



PP COMMUNICATION AREA 
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FOR pro 





59 




17 







W.PP1R 


CPCIO Output Register 


W.PPOR 


MTR Output Register 


W.PPMfSI 
W.PPMES2 


""■ ' ' ii: •■" Stack Request Parameters ....m 


W.PPMES3 


7HDAYFIUS 


3 


W.PPMES4 





W.PPMES5 


7HCERFU.E 


0000 3 


W.PPMES6 









- 





Extend for 
System Dayfile 



Extend for 
CERFILE 



FOR PPT 



W.PPIR 


DSD Input Register 


W.PPOR 


DSD Output Register 


W.PPMES1 




z 
o 


W.PPME32 




W.PPMES3 




COMMUNICAT 
AREA 

I I I 


W.PPMSS4 




W.PPMESS 




W.PPMES6 


DSD - 1DL Communication Word 


I 



| IM-22 



a-ia 
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PP COMMUNICATION AREA (CONT'D) 
FOR PP2 THROUGH PPn 

59 39 35 



W.PPtR 


| C.CPNUM 
Program Nam* or 


1 


W.PPQR 


MTR 

Function 

Cods 




l— - Control Point No. 
*•* Recall 
T -Called from event or delay stack 


W.PPMES1 




STACK REOAJ EST PARAMETERS 


< 

■•■■■ - „ u 


. 


W.PPMES2 




t 

J ...: ..... 


W.PPMES3 


COMMUNICATION W0RO 


OS 

< 

i 


W.PPMES4 




EVENT STACK PARAMETERS 


< 

■ 

c 

t 


t 
i 

3 


W.PPMES5 




> 


W.PPMES8 










1' 



COMMUNICATION WORD 



59 



47 



35 



23 17 



11 



C.RWPPCF 


C.RWPPWT 1 


C.RWPPLW 


C.RWPPCC 


CRWPPWC 


Control 


Cumulative 


PP Buffer 


CRWPPST 


Current PRU Byte 


Point 


Byte Count 


Length 


| Code and Status Count 
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RA COMMUNICATION AREA 



59 



RA+O 



RA+1 



RA+2 






RA+53 



RA+54 



RA+63 



RA+64 



RA+65 



RA+68 



RA+67 



RA+70 



M 



C— 



RA+77 

RA+100 
RA+101 



35 29 23 17 



n 



ss 



User/System Interface 



Parameter 
(One per Word, Left Justified) 



(Reserved) Code 



* 






1AJ Bootstrap for Absolute Programs 



Name/Library Name 



LWA+1 of Loadable 
Area in ECS 



FWAof Loadable 
Area in HCS 



Number of Parameter Words, 
Beginning in RA+2 



LWA+1 of Loadable 
Area in CM 



FWA of Loadable 
Area in CM 



Control Statement Card Image 
(Replaced by Operator Message If CFO Type-In) 



6r 



FORTRAN 2.3 Execution FL 



FORTRAN 2*3 ASA Flag +0 - Non-ASA; -0 = ASA 



Loader Word 



User Program 
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NOTES: RA COMMUNICATION AREA 

R Job dependency recheck bit 

CFO flag (1 = accept comment from operator) 

T Storage move flag (1 = move being attempted) 

P Pause flag (1 = control point pausing) 

SS Sense switches 

CODE 00 » Continuation 

01 ■* Comma 

02 - Equals sign 

03 ~ Slash 

04 = Left parenthesis 

05 = Plus sign 

06 * Minus sign 

07 * Blank 

10 - Semi-colon 

11 -. 
1-2 = 

13 » (reserved) 

14 = 

15 - 

16 = Other 

17 * Termination 

L Library /file flag (1 = name is library name) 

X XJ flag: if XJ ■ 1, and XJ can be issued 

C LE>V completion flag (bit 29) 

D DIS RSS flag (bit 18) 

M CMU Bit; if M»l and CMU can be issued 



H-2-2 _ 60306500 F 
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J 
NOTES ON RA COMMUNICATIONS AREA 

RA Reserved for use of hardware and software flags in the 
event of error- 

R Job dependency recheck bit 

T Storage move flag -CI ~ move being attempted> 

P Pause flag -CI ~ control point pausing} 

SS Sense switches 

SL Sense lights 

RA+1 If a user program wants to call a PP program i the call 
is placed in the RA+1 and then performs and XJ -CCEJ - 
central exchange jump} to initiate CPilTR. CPflTR will 
execute certain RA+1 calls himself. Ifi however i the call 
should be assigned to a PP-t the call will be passed to ilTR. 
Should the XJ -CCEJ/nEJ hardware} not exist on the machine-, 
the CPflTR will be initiated by fITR i if he finds an RA+i 
call in his normal scan. 

Periodic Recall is accomplished by placing *RCL*" left- 
justified into RA+1. 

Automatic Recall for an RA+i request is accomplished by N 

setting bit 40 in RA+i- A CP program may put itself into J 

auto -recall by putting ^RCL* left- justified into RA+1 

and setting bit 40 to one. The low order Ifi bits will be-t 

in any case-i the address of the reply word. 

RA+2-RA+fa3 Contain control card parameters -i if they exist. They are 

stored by ,1AJ • As the control card is crackedi the follow- 
ing codes ar^ used for special characters: 

CODE 00 = Continuation 



01 


SS 


Comma 


02 


= 


Equals sign 


03 


S 


S lash 


04 


s 


Left parenthesis 


OS 


= 


Plus sign 


Ob 


= 


Plinus sign 


07 


at 


Blank 


10 


s 


Semi -co Ion 


11 


s 




12 


= 




13 


3 


{reserved} 


14 


= 


. 


AS 


= 




lb 


= 


Other 


1? 




Termination 



a-ifa 



RA+bM-RA+fc.7 1AJ records the total number of parameters in RA+feM. 

This section is used by the first several Loader 
routines to record Loader information for modification 
of additional Loader routines. 

L Library/file flag -CI = name is library name* 

X XJ flag: If XJ = 1-, an XJ can be issued 

C LDV completion flag -Cbit 2T> 

D DIS RSS flag -Cbit 1S> 
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STUDY QUESTIONS 
SYSTEM TABLES AND POINTERS - SECTION VIII 

1- Locations Q through 77 {octal* of CMR are known as ____ 



5. Some CNR tables are fixed -Ci-e- start in a specific location}- 
These that are not fixed are accessed indirectly through a 



3- P-LIB refers to the System 



M. P.FNT contains pointers to the . . . . , . , ■ 

5- P-ZERO is not a pointer- 
-CaJ True 
-Cb> False 

b- The pointer area of CMR contains some tables. 
■CaJ True 
■Cb> False 

7- Pointers and tables in CMR may not be modified by the PP 
Programmer- 

•Cai True 

-Cb> False 

fl- The control point area contains 

•Ca> The Jobs Exchange Package 

■CbJ The Jobs Name 

-CcJ The Job Time Limit 

■Cd> All of the above 
T- The PP communication area is for ______ _____ 



10. Users may communicate with a PP program throught 
in low "user core"- 



11- PPs may communicate with one another using a 
area in CMR- 



fl-lfi 



STUDY QUESTIONS 
SYSTEM TABLES AND POINTERS - SECTION VIII 



P^J^-Tt 



1. Locations D through 77 {octal* of CM R are known as r£ 7 *) T""<S^ S 

2. Some COR tables are fixed -Ci-e- start in a specific location*. 
These thatjare not fixed are accessed indirectly through a 

3. P- LIB refers to the System K ■' ho 
4- P-FNT contains pointers to the 






I 



5- P-ZERO is not a pointer- 
(2|J) True 
-Cb* False 

W« The pointer area of CAR contains some tables* 

Q-&D Trua 
-CbJ False 

7. Pointers and tables in CMR may not be modified by the PP 
Programmer* 

•Ca* True 

<£bp False 

fi- The control point area contains 

•£a> The Jobs Exchange Package 

-Cb* The Jobs Name 

-tc> The Job Time Limit 
C*dp All of the above / 

=}. The PP communication area is for PP Projra** £er>x)»UMh,<'ci.+ ! &H 

10. Users may communicate with a PP program throught /9A i~ / 

in low "user core"- v 

11- PPs may communicate with one another using a "/S^Ag- ( ArfesS3q&J 
area in CUR- : 
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PP RESIDENT 
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PP RESIDENT 
Lesson Guide 

REFERENCES: 

PP COflPASS Student Guide Section IX 
System Programmers Reference 

TRAINING AIDS: 

Visuals VALS-S3-^-S thru VALS-53-^-7-i VALS-53-^-lD-. VALS-SS-'l-aa-. 
VALS-53-=H53 thru VALS-S3-^-Sb-i VALS-SS-I-ST thru 
VALS-S3-=Hfe>2 
ASSIGNEI1NTS: 

Study Questions Section IX 

OBJECTIVES: 

•Cl> To present the detailed functions of PP resident in 
order that the PP programmer may take full advantage 
of its functions* 

■CH> To present the inter-dependcies of the PP resident 
routines* 

■C3> To introduce the PP programmer to actual system code - STL- 



■=5-1 



PP RESIDENT 
Lesson Outline 



IX- PP RESIDENT 

A- Introduction 



o Pool Processor philosophy 

o Transient Programs 

o Direct Cells 

a Scratch Area 

o Communication PP-System 

PP Program Concepts 

o Direct Ceils 

o PP Resident 

o Transient Area 

o Secondary Overlaps 

o Buffer Areas 

PP Resident Code General Description 

o Handles communications between PP programs and Monitor 

o Miscellaneous functions for programmer 

PP Resident Code Functions 

PP Idle Loop 

Lead Overlay -CintJ 

Request access to FL 

Terminate access to FL 

Test FL 

Issue MTR function 

Uait for MTR 

Reserve channel 

Store byte 

Load Overlay 

Read {Stack Processor} 

Write -Cstack processor} 

Enter Request -Cstack processor} 

■Read/Write code switcher 

Dayfile message 






R.IDLE 





R-OVLJ 





R.RAFL 





R-TAFL 





R - TFL 





R.MTR 





R.QJAIT 





R.RCH 





R-STB 





R-OVL 





R.READP 





R-ldRITEP 





E-EREflS 


d 


R.RUP 





R.DFfl 



i-a 



E- PP RESIDENT Code Flow Charts 

o Note: R-RUP code for communication PP to PP over 
channel 

F- PP Resident Actual Code - STL 
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PERIPHERAL PROCESSOR RESIDENT 



INTRODUCTION 

In the SCOPE operating System, the System Display program (DSD), and the Monitor pro- 
gram (MTR) permanently reside in two of the peripheral processors, 1 and respectively. 
The remaining processors form a pool of processors to which MTR may assign tasks as 
required. These pool processors have no fixed assignments; any processor may be 
assigned to the execution of any system routine, and it is possible that more than one pro- 
cessor may be executing the same routine at the same time. All processors contain a 
small resident program which handles the communications between pool processor pro- 
grams and the Monitor, and initiates the execution of these programs as directed by MTR. 

When SCOPE is deadstarted a series of deadstart PP programs are loaded into the PP's. 
The last deadstart program to be loaded is named STL. It is loaded at location 100g in each 
of the pool PP f s. The program STL contains PP Resident, STL starts executing at loca- 
tion 1000g._ When it is done it jumps to the PP Resident Idle loop, R.IDLE (see below), and 
the PP is ready to load and run programs as directed by MTR. 

POOL PROCESSOR STRUCTURE 

PP resident is contained in locations 0103g through 0772g. When directed to do so by MTR, 
the resident loads a program into its memory and executes it. Since that program remains 
in that processor only for the period of time required to perform its function, it is called 
a transient program. Transient programs occupy locations 0773B through 1772B, although 
the first instruction is at location 1000B. Transient programs generally load overlays to 
perform specific tasks. For example, CIO, which is a transient program, calls various 
overlays depending on the task (read, write, backspace) and the equipment (disk, tape, etc.) 
specified. Secondary overlays are loaded into memory beginning at location 1773B, the 
first instruction falling at location 2000g. Overlays are generally entered via a return 
jump. Transient programs have names beginning with a letter (CIO, EXU) or the num- 
eral 1 (1AJ, 1IQ); overlays have names beginning with a numeral 2 through 9 (2BP, 4LB, 
9DM, etc.) 

Both transient and overlay programs, as well as the resident program, make extensive use 
of the low core locations 01 through 73. Figure 2 details these direct cell assignments. 
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PP RESIDENT 

The peripheral processor resident program has two main functions to perform: 

1. All communication between MTR and the transient or overlay programs is handled 
by the resident. 
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POINTER TO INPUT REGISTER 



POINTER TO MESSAGE BUFFER 



POINTER TO CONTROL POINT AREA 



POINTER TO PP STATUS WORD 



FIELD ACCESS FLAG 



RESERVED FOR CDC 



RESERVED FOR CDC 



PP RESIDENT 



TRANSIENT PROGRAMS 



SECONDARY OVERLAYS 







74 8 
75 8 
76 8 
77 8 
100g 

1018 
102 8 



772 8 
77 3 8 



1772 8 
1773 8 



7777c 



*" Cells 76 through 102B constitute the five bytes of the PPU f s 
central memory status word. 

Pool PP Layout 
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DIRECT CELLS 
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for. current file 
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by this PPU 
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Field iensth 100/ S oi" user's area 



D- FA 


Address of file F3 i acuress \ 


X), FIRST 

D.rntstH 


Circular buffer' j 
First parameter from FET 1 


D. IN 
D.Ef+1 


Circular buffer 

IN parameter from FET . 


D.OUT 

D.OUTH 


Circular Buffer 

OUT parameter from FET 


D. LIMIT 


Circular buffer 

Limit parameter from FET 


D.PPONE 


Tb.3 coastaat 1 


D.EN 


The coastaat 1QQB 


D.TH 


The coastaat 100 0B 


D.TR 


The coastaat 3 


D. PPIR 


.. Address of input register 


D.PP1IZ3 


Address of massage buffer 


C.CPAD 


Address of control poiat area 


D, PPSTAT 


Address of PP3TATU3 word 



2. The resident, when directed by MTR, : loads transient programs and initiates the 
. execution of these programs. 

Communication betweea MTR and the resident program is carried out through the use of 
!>? communication areas in central memory, one for each processor. Each communication 
area consists of a one-word Input Register, a one-word Output Register, and a six-word 
Message Buffer. Pool processors address these areas by means of pointers in locations 
D. PPIR, D.PPMESl, and D. PPSTAT. - 

MTR^assigns a task to a pool processor by placing the request ia the processor's Input 
Register. The name of the program package which is to be loaded and executed appears in, 
ihehigh-ordar IS bits of the Input Register. This name consists of three display code 
-characters, such as 1AJ, CIO,' etc. The number of the control point to which this package 
is assigned appears. in the low-order four bits of byte 1 of the Input Register. Package 
parameters, 'such as the address of arguments required by the package, appear in the low- 
order 35 bits of the Input Register. The P? is given control to execute the code just 
loaded. ' The request itself remains in the Input Register until the task is completed. On 
completion of a task, the transient program requests MTR to release the processor; MTR 
thin clears the processor's Input Register. The Input Register of a pool processor is thus 
clear only when the processor is idle. 
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All communication between the Monitor and the transient and overlay programs is handled 
by the resident program. MTR performs a variety of functions, each of which is identified 
by a function code of one or two octal digits. 

To transmit a monitor request, the resident routine R. MTR places the request in the PPs 
output register. R.MTR uses locations D. TO through D. T4 in peripheral processor mem- 
ory as temporary storage for the request to be written into the output register. Byte of 
the register contains the function code in the low-order bit positions. Bytes 1 through 4 are 
used for the arguments. Thus, for a Request Channel Function (M.RCH=12), the channel 
number is placed in byte 1. For some functions, the arguments are placed in the message 
buffer and only the function code appears in the output register. A peripheral processor 
program may utilize the routine by placing the arguments for the function in bytes D. Tl 
through D. T4, setting the A register function number and executing a return jump to 
R.MTR. The resident routine will enter the function number in location D. TO and write 
the contents of locations 0. TO through D, T4 into the output register. R.MTR will jump 
to R. WAIT. 

If the system is using the XJ/MXN or MAN, R. WAIT will decide whether the monitor 
request is for CPMTR or MTR. If the request is for CPMTR, the PP input register 
address is written into word 47 of CMR,T. PPID. CPMTR requests are the first ten 
functions (12B) unless the ILR is used in which case CPMTR executes the first nine (11B) 
functions leaving M.RCH(12B) to be handled by MTR. 

If the request is for MTR, the input register address is written into word 50 of 
CMR,T. PPIP. MTR executes all functions greater than 12B. The use of T.PPIP saves 
MTR from having to search through all of the output registers. MTR need only check one 
word in CMR to know if a request is pending. PP resident will issue an MXN or MAN to 
initiate CPMTR if needed. Otherwise the request will be picked up by MTR in its loop. On 
an EXN system, only T.PPIP is used by PP resident. Regardless of mode of execution, the 
resident will wait until the output register is cleared by MTR before proceeding. Control 
will be returned to the requesting program upon MTR's clearing the output register. 

When a pool processor program completes execution, it exits to location R.IDLE, which is 
the address of the resident idle loop. The entry point to this idle loop is R.IDLE (103s). 
When referring to a PP Resident routine, the name of its entry point is used as the name 
of the routine. Thus the name of the idle loop is R.IDLE. In this idle loop, the processor's 
Input Register is scanned at intervals until a request is found in the Input Register. A 
delay between successive scans avoids unnecessary memory and read pyramid conflicts. 
Normally, the PP Input Register of an idle PP contains zero. If the PP Input Register 
becomes non-zero, it means MTR wants PP Resident to load a PP transient program into 
the PP. When a request is detected, the resident stores the routine name and the control 
point. It then sends function R. TAFL, terminates access to the control point field length, 
to MTR and waits for MTR to clear the Output Register before continuing. When the Out- 
put Register is cleared R.IDLE calls the PP Resident subroutine R.OVL. R.OVL will 
then search the library directory for the requested routine; if found, the package is read 
from the resident library into the processor's memory beginning at location 773g 
(C. PPFWA through L. PPHDR). If the routine is not found in the directory, IE J enters 



the message "XXX NOT IN PPLIB" in the dayfile, and requests MTR to abort the job which 
called the routine. The resident then returns to its idle loop. If the program is located, it 
is loaded by R. OVL which then returns control to R.IDLE which executes the instruction 

LJM C.PPFWA 

This transfers control to the first instruction of the transient program. When a transient 
program terminates, the instruction it must execute is 

LJM R. IDLE 

At location 100B of PP resident is the field access flag. There is evidently some need for 
a better description of the use of the field access flag. The basic principles are: 

1. The field access flag must always be set whenever any data is read or written 
within a user field length. 

2. The execution of the R. MTR subroutine while the field access flag is set may 
cause R. PAUSE to be executed. If an absolute address has been computed and 
saved, it is invalidated by the execution of R.MTR because D.RA may change. 

3. When a PP program is looping, waiting for any external event to occur, the loop 
must either be performed while the field access flag is not set or must include an 
execution of R. PAUSE. 

4. When no field length access is required for a major process (i.e. searching the 
FNT) it is best to clear the field access flag while processing. This allows a 

- storage move to be initiated without delay. 

R.RAFL (synonymous to R. PAUSE) will set the field access flag. If a storage move is in 
progress, the field access flag is not set until the storage move flag has been cleared. If 
the field access flag is already set, R.RAFL checks the storage move flag and temporarily 
clears the field access flag to allow the storage move. 

R. TAFL is used to terminate access to the field length. It unconditionally clears the field 
access flag. 

RESIDENT ROUTINES 

Several resident routines and words are used by transient and overlay programs. These 
routines are described below. The order of the routines has been changed but essentially 
the function of each routine remains the same with the exception of R. OVL, R.RCH, and 
R.DCH. These three routines have been conditionally modified to accommodate the 
Distributive Data Path (DDP) and Interlock Register (ILR) in CYBER 70 hardware. Should 
an installation not use these two hardware features, PPRES is functionally unchanged. 

In the diagram of PPRES the labels MAIN, SEG-1, and MAIN2 refer to the segments 
described at the discussion of the DDP/ILR at the end of this section. 
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PP RESIDENT ROUTINES 
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SEG-1 



R.IDLE 
R. OVLJ 

R.RAFL 

R.TAFL 
R.TFL 

R.MTR 
R.WAIT 

R.RCH 
R.DCH 

R.STB 

R.OVL 

R.READP 
R.WRITEP 

R.RWP 

R. EREQS 
R.DFM 



MAIN2 



PP RESIDENT IDLE LOOP 



LOAD PRIMARY OVERLAY INTERNALLY 



REQUEST ACCESS TO CONTROL 
POINT FIELD LENGTH 



TERMINATE ACCESS TO CONTROL 
POINT FIELD LENGTH 



COMPARE ACCUMULATOR TO FIELD LENGTH 



ISSUE MONITOR FUNCTION 



WAIT FOR OUTPUT 
REGISTER TO CLEAR 



RESERVE CHANNEL 



DROP CHANNEL 



MASK BYTE INTO LISTED WORDS 



LOAD PP OVERLAY 



TRANSMITS DATA FROM STACK PROCESSOR 



TRANSMITS DATA TO STACK PROCESSOR 



SUPPLIES DISK READ/WRITE LOGIC 



ENTER REQUEST STACK 



TRANSMIT DAYFILE MESSAGE 



CONDITIONAL CODE 



103 
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343 
362 

542 
551 
566 

655 

704 
737 
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• R.IDLE 

Calling Sequence: LJM R.IDLE 

R.IDLE is the idle loop in which PP resident continually scans its input register for 
something to do. 

• R. OVLJ 

Calling Sequence: Store name of overlay in D. T6, D. T7. 

LJM R.OVLJ 

The R. IDLE routine contains an additional entry point named R. OVU. A PP program 
can load a transient program on top of itself without changing the Input Register by 
storing the name of the transient program left-justified in D. T6 and D. T7, and then 
executing a long jump to R. OVLJ. The program will be loaded at C. PPFWA through 
L.PPHDR and control will be transferred to location C. PPFWA. 

R.IDLE destroys direct cells 20 8 through 22g and some of the temporaries. R. OVLJ 
and all other PP Resident routines destroy only temporary cells (0 through 173). 

o R. RAFL 

Calling Sequence: RJM R.RAFL 

The subroutine is called to request access to the control point field length. A test is 
made on the storage move flag for the control point. If set, a call is made to R. TAFL 
to clear the field access flag in the PP status word, then pauses until the storage move 
is cleared. When it is cleared, set the field access flag in the PP status word and 
reset RA in D. RA, FLinD.FL. 

• R.TAFL 

Calling Sequence: RJM R.TAFL 

R. TAFL is called to terminate access to the control point field length by clearing the 
field access flag in CM byte R. FAF. 

• R.TFL 

Calling Sequence: Load relative address 

RJM R.TFL 

R. TFL is used to insure that a relative address is within the field length. The 18-bit 
address is added to the control point reference address (RA) and compared with the 
field length. If the address is out of range, R. TFL will exit with a negative A register. 
If the address is legal, the A register will contain the absolute CM address (RA + 
relative address) upon exit. The control point RA and FL are kept locally within PP 
resident at D. RA and D.FL, respectively. Since these locations are set by routine 
R.RAFL, the transient program and its overlays cannot call R.TFL until R. RAFL has 
been called. Many PP programs do not call R. TFL but do their own checking of 
addresses. 



R. MTR 

Calling Sequence: Store function parameters in D. Tl to D. T4 

Load function code 

RJM R. MTR 

The PP resident subroutine R. MTR is called by PP transient programs and overlays 
to transmit requests to MTR. The requesting PP program sets direct cells D. Tl 
through D. T4 with the values it wants to be put into the four right-most bytes of the PP 
Output Register. The requesting program then loads the MTR function code into the 
A Register and executes a return jump to R. MTR. R. MTR stores the function code 
value from the A Register into cell D.TO and then writes D.TO through D.T4 to the 
Output Register. R, MTR then executes a return jump to the R.WAIT subroutine. 
R.WAIT checks the left-most byte of the Output Register at a fixed interval. When the 
byte becomes zero (meaning that MTR has processed the request), R. WAIT returns to 
R..MTR which returns to the calling routine. 

In order to check byte zero of the PP Output Register, R. WAIT reads the Output Regis- 
ter into direct cells D. TO through D. T4. When control is returned to the PP routine 
which called R. MTR, these direct cells are intact; (i. e. , they contain the value of the 
Output Register read by R.WAIT). For certain MTR requests, MTR will return param- 
eters to the requesting PP in bytes one through four of the PPs Output Register. The 
requesting PP routine can pick up these parameters from ceils D. Tl through D. T4. 

When a PP transient program has completed its function, it must inform MTR, so that 
MTR can assign a new task to the PP. The program tells MTR it has finished by 
issuing an M. DPP function. MTR will zero the input register of the PP and record the 
fact that the PP is available. The last few lines of code of each PP transient program, 
therefore, are: 

LDN M.DPP DROP THE PP ASSIGNMENT 

RJM R. MTR 

LJM R.IDLE EXIT TO IDLE LOOP 

Note that R.IDLE is not a subroutine and it is entered with a long jump and not a return 
jump. 

R.WAIT 

Calling Sequence: RJM R. WAIT 

R. WAIT has been modified for the use of two monitors and the MXN. R. WAIT is 
responsible for determining whether a PP request is for MTR or CPMTR. If the 
request is for CPMTR, the PP input register address is written into T.PPID. 
T.MXNCTL is read up and executed. This word contains the exchange package address 
to which the MXN will be issued. 

U the request is for MTR, the input register address is written to T. PPIP. In either 
case, R^WAlT will cause the PP to idle until byte of the output registers clear. 
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• R.RCH 

Calling Sequence: Load channel number 

RJM R. RCH 

The channel numbers contained in the A register will be stored in byte D. Tl, monitor 
function M.RCH inserted in D. TO, and D. TO through D.T4 written to the output 
register for that PP. Channels will be assigned by MTR on the following priority 
basis. 

If alternate channels are specified MTR will stop looking for alternate channels upon 
sensing 6 bits of zero. Thus, if one alternate channel is desired, the programmer 
must clear D. T2 before entering R. RCH so the search will be terminated at that point. 
The procedure for requesting channel 12 with alternate channel 13 would be: 



LDN 


n 


STD 


D.T2 


LDC 


1312B 


RJM 


R.RCH 



Monitor will stop looking for alternate channels after four channels have been investi- 
gated or 6 bits of zero are detected. 

When R.RCH is used, D. T4 is automatically set nonzero; in this case, the function is 
not considered complete; (i. e. , output register is not cleared) until a channel can be 
assigned. When complete, byte of the output register is cleared. 

R.DCH 

Calling Sequence: Load channel number 

RJM R.DCH 

Since more than one PP can request the same channel at the same time, it is necessary 
to use an MTR request to reserve a channel. 

The only PP which can release a channel, however, is the PP which reserved it and 
there is no need for an interlock. To release a channel reservation, a PP program 
loads the number of the channel into the A Register and executes a return jump to the 
PP Resident subroutine R.DCH. If the channel is assigned to the PP, R.DCH will 
modify the Channel Status Table entry for the channel to indicate that the channel is 
free. If a PP calls R.DCH to release a channel it has not reserved, R.DCH will issue 
an M.KILL. 
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• R. STB 

Calling Sequence: Load L(List) 
R-JM R.STB 

Where list has the form: 

L (byte) 
L (word 1) 
L (word 2) 



L (word n) 
zero 

An entry point to R.STB called R.STBMSK is the address of the mask "anded" with each 
word in the list before the word is "allusive ored" with the byte. This mask is 
initially 7700B and this value should be restored by any routine which substitutes an 
alternate mask. R. STB is used primarily to substitute channel numbers in driver 
overlays. 

All the PP hardware instructions used for I/O contain a field which specifies the mm- . 
ber of the channel over which the I/O is to take place. For example, the instruction 

IAM BUFF, 5 

would be used to read data from hardware channel five into the PP starting at location 
BUFF. 

When a programmer is coding a PP program, he normally does not know what channel 
will be used for the I/O. The channel number is normally obtained by the PP program 
from an entry in the EST table. For this reason the above I/O instruction would be 
written as follows: 

IAM BUFF, ** 

The double asterisks indicate that the value will be filled in by the program itself when 
it is executed. COMPASS assembles double asterisks as a zero. 

Since the channel number goes into the first (or only) byte of an instruction along with 
the OP code, the first byte of the instruction would contain 7100 8 (the OP code for an 
IAM is 71 8 ). The second byte of the instruction would contain the value of BUFF. 
When the PP program is called, and determines the channel number, it must modify 
all the I/O instructions in itself so that the first byte of each instruction contains the 
OP code followed by the correct channel number. Normally there would be a list 
somewhere in the program giving the addresses of all instructions to be modified in 
this way. 

=1-114 



The PP resident subroutine R.STB can be called to insert a channel number into one 
or more instructions, whether or not the fields to be altered previously contain zero. 
Before return-jumping to R. STB, the program loads the address of a list in the A 
register. The first byte in this list contains the address of some other PP cell that 
contains the new channel number. The second and following bytes of the list contain 
the addresses of the instruction words in which che new channel number is to be 
inserted. The first zero byte in the list terminates it. 

Although R.STB inmost often called to insert channel numbers into I/O instructions, 
it can also be called to perform general masking operations. 

• R. OVL 

Calling Sequence: Store name of overlay in D.T6, D. T7 

Load A register Load Address 

RJM R.OVL 

This routine has been changed for SCOPE 3.4. It now performs a binary search upon 
the PP Program Name Table (PPNT), looking for the name of the overlay. If the name 
is found, the overlay is loaded from CM, disk, or ECS. If it is not found, an OVL. 
error flag is set and the control point is aborted. Then an exit is made to R. IDLE. 

Calls: R.READP (Disk Resident Overlay) 

R.MTR (PP Call Error) 

a R.READP (R.WRITEP) 

Calling Sequence: Load L (request) 

RJM R.READP (R.WRITEP) 

When a PP program wishes to issue a stack request for a transfer of data to or from 
its own memory, the PP program formats the stack request, loads the address of the 
request into the A Register, and calls the PP Resident subroutine R.READP/ 
R.WRITEP. There are two entry points to this subroutine. If the stack request is to 
read data, the entry point R. READP is used. R. WRITEP is used when writing data. 

R.READP (R. WRITEP) computes the PP word count from the first and last word 
addresses given in the already formatted request and adds the computed word count, 
the address of the PP message buffer, and the control point number to the request. 
The request is entered in the stack and data is transmitted via channel directly to 
(from) PP memory. Upon exit from R.READP (R.WRITEP), the following information 
will be set: 

(D. T3 + C.RWPPWT) = number of PP words transmitted 

(S.T3 + C.RWPPLW) '■«' LWA+1 of data transmitted 

(D. T3 + C„ RWPPST) = upper six bits of status in bits through 5 

(D.T4 + C. RWPPST) '■= lower twelve bits of status 



=1-15 



The 18-bit status has the same format and meaning for PP I/O as the status in bits 
through 17 of the first FET word for central memory I/O. 

READP/R. WRITEP will call R. EREQS to issue the stack request. It then helps 
control the transfer of data by communicating with stack processor. 

• R.RWP 

Calling Sequence: Load IAM/OAM function 

71B = IAM 
73B = OAM 

RJ1I N R.RWP 

This routine performs a number of functions in handling the reads and writes on disk. 
R.RWP will set the functions for the IAM or OAM; sets the FWA for transmission; 
stores the PP message area address in the stack request and then issues the stack 
request. If the field access flag was set, R.RWP will pause for storage relocation and 
then perform the disk I/O. Transmission is governed by control word W.RWPPCW of 
the PP message area* 

= Request is in stack 

1 = Sense waiting for channel 

2 = Sense waiting for transmission 

3 = Sense transmission ready 

4 = Sense end of transmission 

Calls = R. EREQS 
R. PAUSE 
R.STB 

• R. EREQS 

Calling Sequence: Store L(request) in D. TO 

RJM R. EREQS 

In order to place a request in the request stack (for the stack processor) this PP sub- 
routine adds the control point number to the request, places a request in the message 
area, and issues an M. ICE function for SPM. 

• R.DFM 

Calling Sequence: Load L(message)+flag bits 

RJM R.DFM 

R.DFM will cause a message to be written from PP memory to the dayfile and/or the 
console. The flag bits are contained in the high-order 6-bits of the A register upon 
entry to R. DFM and are used to determine the destinations of the message. Possible 
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values of the flag bits are described below; one or more bits may be on. All are 
optional. 

Bit = Do not send to B display. 

—- - Bit 1 = Do not send to control point dayfile. 

Bit 2 * Do not send to system dayfile (no A display). 

Bit 3 = Flag as an accounting message (a $ will be placed in the 20th character 
of messages that are sent to system dayfile). 

Bit 4 = Send to hardware error file. 

Bit 5 - Do not insert job name in system dayfile. 

• READECS 

This is an extension to R. OVL which is entered when a load from ECS is needed. 

PERIPHERAL PROCESSOR RESIDENT WITH DPP AND ILR 

INTRODUCTION 

This is a discussion of PP resident for those who will be using the two new features of 
CYBER 70 hardware, namely the Distributive Data Path (DDP) and the Interlock Register 
(ILR). Complete descriptions of the hardware are found in the section called CYBER. 70 
Hardware Features. Likewise, most PP resident functions will remain the same and they 
are described earlier in this section on PP resident. The concern here is with the seg- 
menting of PP resident and how it accomodates the DDP and ILR. 

CYBER SYMBOLS 

There are several parameters and symbols which are relevant to the discussion of the DDP 
and ILR. They are described here with their default values indicated. 

IP.DPLIB = If non-zero, this parameter indicates that the DDP is to be 

used for PP overlay loading from ECS. Certain code, 
such as SEG-2 and the PP resident segment loader in 
JVIAENf, is conditionally assembled with IP.DPLIB 4 0. 

IP.ELIB * Used with IP.DPLIB in the following manner: 

IP. E LIB * 0; no overlay loading from ECS 

IP. EUB 7* 0, IP. DPLIB * 0; perform overlay loading 
from ECS via CM buffer, ICEBOX 
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IP. ILR = 



CH.ILB = X5B 



C.ILR = 2 
C.PPOVL = 3 

P.ILR » 77B 
P.PPOVL = 77B 

S.CHAN = 12D 



IP. E LIB t 0, IP.DPLIB ± 0; perform overlay loading 
from ECS via DDP, if present. Other- 
wise use ICEBOX. STL makes this 
decision at initialization time by 
searching the EST. Certain code in 
MAIN is conditionally assembled 
depending upon IP. ELEB ^ 

Indicates the presence of ILR. If no ILR exists, every- 
thing is assembled with IP. ILR = 0. If ILR is present, all 
PP code is assembled with IP. ILR ^ but C MR is set 
zero or non-zero, to indicate whether or not the ILR is to 
be used. Word 77 of CMR (P.ILR/P. PPOVL) has byte 2 
set to the value of IP. ILR. At initialization this byte is 
checked for the presence of the ILR. There is also a cheek 
made for a physical channel 15. If none exists, PP resi- 
dent will clear this byte. 

The ILR hangs on its own channel 15B. This channel is 
always active and if no ILR exists, channel 15B is not 
used. The symbol CH. ILR should be used to refer to this 
pseudo channel. 

The number of the byte in P.ILR (77) which contains the 
value of IP. ILR. This byte serves as the ILR on/off flag. 

Number of the byte in P. PPOVL (77) which contains the 
pointer to the CM buffer used to hold SEG-1 and SEG-2 
of PPRES. 

Word 77 of CMR which contains the ILR on/off flag. 

Word 77 of CMR containing pointer to PPRES overlay 
buffer and address of the beginning FNT entry for the ECS 
library. 

The ILR has one bit for each channel and pseudo channel 
in the system, mapped from left to right. These channel 
numbers begin with channel zero at bit 12 (actual bit 13). 
Channel numbers are calculated by biasing the number by 
S.CHAN. 
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POINTER WORD - P. PPOVL/P. ILR 



59 



47. 



35 



23 



11 







C.ILR 
IP. ILR 


C.PPOVL 
T.PPOVL/10B 


T. ELIBD 



C.ILR/IP.ILR 

C.PPOVL/T.PPOVL 
T. ELIBD 

EST Entry for DDP 

59 47 



77 



Contains value of IP. ILR. Read up by PP's to verify ILR 
exists^ 

Table in CM holding PPRES overlays, SEG-1 and SEG-2. 

Beginning FNT entry for ECS library. 



35 



23 



11 





CH2 CHI 


CH4 CH3 


"DP" 


EQ. 
NO. 





ON/OFF BIT 



DP" is the hardware mnemonic for the DDP. 



SEGMENTATION OF PP RESIDENT 

In order to support the DDP and ILR, considerable code had to be added to PP resident. 
Not desiring to expand the size of the resident area, it was decided that the most practical 
solution was to segment PPRES. This segmentation is transparent to the USER and, in 
fact, will occur only if IP. DPUP is defined as non-zero. 

The structure is as follows: 

MAIN 



103 


R.IDLE 


125 


R.OVLJ 


133 


R.RAFL 


172 


R.TAFL 


202 


R.TFL 


217 


R.MTR 


230 


R.WAIT 


271 


R. RCH 


Q£& 


R.DCH 


342 


R.STB 



•i-n 



This segment permanently resides in PPRES beginning at location 103B. It is not overlayed. 
SEG-1 SEG-2 



362 


R.OVL 


542 


R.READP 


551 


R.WRITEP 


566 


R.RWP 


655 


R. EREQS 


704 


R.DFM 



364 



724 



DDP overlay 
loading 



SEG-2 is assembled only if IP.DPLIB $ 0. 

R.OVL's entry point is part of MAIN. The real origin of SEG-1 is 364. This allows 
SEG-1 to be overlayed by SEG-2 and when SEG-2 has finished executing, return jump 
to R. OVL. SEG-2 is automatically overlayed by SEG-1 again, when execution is 
finished. 



MAIN2 (conditionally assembled) 
(IP. E LIB ^0) 



(IP.DPLIB ± 0) 



737 



766 



load from ECS 
via CP. ECOVL 



737 



PP res segment 
loader 



This second section of MAIN is determined at deadstart time depending upon the 
setting of the IPARAMS. Once the decision is made, MAIN remains constant through- 
out the running of the system. 



MAIN 



SEG<-1 



MAIN 



SEG-2 



MAIN 



STL 
INITIALIZATION 



. At deadstart, a check is made for the 
presence of the DDP. 



. . If the DDP is to be used, SEG-1 and SEG-2 
are written to CM 




SEG-I=57B CM wds. 
SEG-2=55B CM wds. 



. MAIN following SEG-1 is overlayed by the 
MAIN following SEG-2 if DDP is to be used. 



PP Resident - Segmented 
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PPRES - FUNCTIONING WITH THE DPP 

If IP.DPLIB is set non-zero and the PP routines have been assembled with the DDP/ILR 
code, the procedure is as follows: 

PP overlay loading from ECS — 

• PPRES now contains MAIN-SB G-1-MATN2. 

• A request for a PP overlay is made. 

• R.OVL searches the PPNT for the program name. 

• When the program is found, a check for residency is made. 

• If ECS resident, a jump is made to the portion of MAIN2, which contains the 
PPRES segment loader and load SEG-2 over SEG-1. 

• SEG-2 check to see if the DDP is operational. 

• If DDP available, the overlay is loaded through the DDP and then SEG-1 is 
reloaded. 

• A jump is made to the entry point of R. OVL. 

• If the DDP is not available, a jump is made to BACKUP where the residency of 
this overlay is changed from ECS to disk in the PP Program Name Table (PPNT). 

» Then SEG-1 is reloaded, a jump is made to the entry point of R. OVL, and the 
overlay loading process is begun again, this time from disk. 

It should be noted here that the above procedure for backup is used in any case of DDP 
unavailability; i. e. , the DDP is turned off, the hardware is dead, etc. It is also used in 
case of ECS parity error in which case the status word is read to check for parity or abort 
status. After the flaw table has been updated and an entry made in the C. E. Error File, 
the system will go to disk backup. 

PPRES - Functioning With the ILR 

The ILR is used by PPRES for channel reservations. There are several functions available 
in the ILR but the most commonly used functions are Test and Set, Test and Clear, and 
Clear. 

• R.RCH 

If the ILR is present, R.RCH in PPRES will simply perform a Test and Set on the ILR 
bit corresponding to the channel to be reserved. In a channel request, PPRES will 
only test one time. If the R. RCH is unsuccessful (the channel bit is already set), the 
request must then wait and be processed by MTR in its loop. If, however, R.RCH 
was successful, the bit is set meaning the channel is now reserved. Then the Channel 
Status Table (CST) is updated to reflect the reservation. 
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Since, normally, channel reservation is performed by CPMTR, in the case of the ILR 
the number of CPMTR functions is dropped to eleven, eliminating M.RCH with code 12. 

R.DCH 

Dropping the channel is simply a matter of clearing the channel bit in the ILR. It is not 
necessary to update the CST, since channel reservation does not depend upon this 
information. 



=1-92 



B.lDtE 



PP BESIDENT D)LE LOOP 



-0 

I 

LU i 




<iut 

Oil. It. Al'i.ll 

AiMivkh 

-»D.{: p ah 




TERMINATE ACCESS TO THE 
CONTROL P OINT l-IELI) LENtiTII 



( H.TAFL 


) 




1 


2ero 
a. f'AF 






Write 

D. TO - D. T4 

To PPOE 


I 


f EXIT 


) 



LOAD PP OVER LAY 

( n.ovL \ 



ISSUE MONITOR FUNCTION 




) D. Tl - D. 



Function 
T4* 
Parameters 




C^lD 



It. MTU A /»• M1 '" 

M.AUOUT ) ( M.KIM. 



P. 4-20 



Huntf Overlay 

From CM 

to PP Memory 



( EX ' T ) 



H. IDLE 



n 

l 

m 

LU 
i 

I 

ru 

LU 



UKADECS 



I 

ru 

-c 



BEAD FBOM DISK 



BEAD1SK 




K.ror.i: 
t\4-;so 



( EXIT J 




READECS 



Head (D. 22) 
Wds. From 

(A) ■*■ Loo 
304,, . . 



LJM 0, D. 7.Z 



BEAD FBOM ECS 
(NO DDP IIABDWABE) 



If ECS parity urror 
ucuuiu CI'MTIt will 
ujiungu ruultloticy in 
1'1'LIU. Entry (runt 
ECS to (link, no try 
tiguiu. 



OVL 



HEAD EltOM ECS 
WffU,RDy,HABPWA» E 

ecovl! 




K.liCIl 



BESEBVE CHANNEL 
(WITHOUT ILK) 



n. ncn 



WITH ILB 



(A)-*-D.Ti 



ENTER: 

<A> = Cli NO. 

RJM B.DCH 



M.ItCH-*- 

U. Tl •*• 
Da Nut Kuturn 
Wltlioul CM 



H 

It. MTU 



, J", i-ao 



f BETllltN J 




f ItKTUHN J 



B.DCH 




UNLOCK 



( HE-TURN J 



r- 
U} 
j 

Ln 
LU 

I 
J3 

I 
ru 



J] 
I 

ru 



( B.ItEADP j 



Load 71 
= Head 
Function 



BCOM 




I/O TO AND KUOM A PP 

There are two routines In PP resident (or doing mass storage. 

I/O TO AND FROM A PP 

1) H.BEADP 

2) R.WRITEP 

Besides the two word stuck request in the first and second words 
of the message buffer, there is. a third word which goes into the 
third word of the requesting PP's message buffer. This third 
word is used for dynamic communication with the stuck processor. 

The communication word is as follows: 
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Code 


Toint ilyto 
Count 


Current LWAH 




Channel 

Number 


«ytu 
Count 










CoUu und Status 



COMMUNICATION BKTWKKN ISP AND ANOTIIK1I I'I'U 



ISP 



Same 
Channel 



OAM 
iAM 






( Disk \ 



1AM-U. Hfc'ADP 
OAM-K.WMTIiP 



Phase Code 

- Wait fur ISP 

1 - Channel Monitor Okay 

2 - ltc.dy for Data 

3 - Data Is Coining 
■I - Done 

5 - Acknowledge 



XXX makes request and zeros out word In communication area. 

ISP when it selects this request, discovers the channel and sends 
it to the communication word. 

XXX sets phase to 2. 

ISP will sense and read data from the disk. 

S) Once read ISP will set the phase to 3 and switch the channel to 
the requesting PP. 

ISP docs an OAM and XXX picks it up with an IAM und sets the 
phase to 2. 

When the stack processor wants to terminate the operation it 
sets the phase to 4. 

XXX senses and acknowledges with phase code set to S to tree the SP. 
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FUNCTION __..■__.. 

"STL is" LOAOEOINTO PP1 « i SOON AS IRCP HAS COMPLETED THE 
ncarKTAUTXOADING PROCESS TO TRANSMIT , 

?HE PP RESIDENT TO THE POOL PPS AND LOAD MTR, OSO INTO _ 
PPO, PP1 RESPECTIVELY 
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STL EXPECTS THE SYSTEM TO BE INTACT ON AN ALLOCATABLE 
"""DEVICE; CHR TO BE INTACT IN CM, AND ALL RECORD BLOCKS" 
USED BY THE SYSTEM TO Bt RECORDED IN THE APPROPRIATE 
RBR-S AND RBI-S. FURTHER, IT IS ASSUMED THAI NTR ANO " 
DSD HAVE BEEN COPIED TO CM AT MTR8UF AND OSDBUF DURING 
SYSTEM LOADING. FURTHER, IT IS ASSUMED THAT PP2-PP19 
ARE LOOKING FOR THEIR RESPECTIVE NUMBERS IN CM LOCN 

UPON DETECTTNG - 



EXIT 



"ZEROAMETTHAT PPO IS LOOKING FOR 778. 
ITS NUMBER IN LOCN ZERO EACH PP BEGINS EXECUTING AN 
TAH INSTRUCTION ON CHANNEL ZERO. 
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WHICH RUNS FROM LOCNS 100B TO 1000B. THE SECOND STL 
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AT 100 OB. STL 
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•CALL IPARAMS — SCOPE 3 INSTALLATION PARAMETERS 



IPARAMS CTEXT SCOPE 3 INSTALLATION PARAMETERS. 
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IPARAMS 2 



♦CALL ECSCOM — ECS DEFINITIONS 



ECSCOM 
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STL 61 

IN THE SCOPE OPERATING SYSIEM, THE SYSTEM MONITOR PROGRAM STL ' 62 

IHTRJ ANO TH"£ DYNAMIC SYSTEM DISPLAY PROGRAM <OSO» PERMANENTLY STL 63 

RESIDE IN TWO OF THE PERIPHERAL PROCESSORS, PPO AND PPL STL 6<t 

RESPECTIVELY. THE REMAINING PERIPHERAL PROCESSORS FORM A POOL STL 65 

OF PROCESSORS TO WHICH MTR MAY ASSIGN TASKS AS REQUIRED." STL" "66"" 

THESE POOL PROCESSORS HAVE NO FIXED ASSIGNMENTS - ANY STL 67 

"PROCESSOR MAY BE ASSIGNED TO THE EXECUTION OF AMY SYSTEM STL " 68 

ROUTINE. ANO IT IS POSSIBLE THAT MORE THAN ONE PROCESSOR MAY STL 69 

3E EXECUTING THE SAME ROUTINE AT THE SAME TIME. ALL STL "70 

PROCESSORS CONTAIN A SMALL RESIDENT PROGRAM WHICH HANDLES TWE STL 71 

"COMMUNICATION BETWEEN POOL PROCESSOR PROGRAMS AND MTR "ANO "STL 72 

INITIATES THE EXECUTION OF THESE PROGRAMS AS OIRECTEO BY MTR. STL 73 
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PP RESIDENT IS CONTAINED IN LOCATIONS 103B-772B."HHENDIRECTEO 
TO So SO BY MTR, THE RFSIOENT LOADS A PROGRAM INTO ITS MEMORY 
-lua FXFCUTES IT - SINCE THAT PROGRAM REMAINS IN THAT 
PROCESSOR ONLY FOR THE PtUIOO OF TIME REQUIREO TO PERFORM _ITS_ 

-TUNcnoSrn^s calleo a transient program. " transient- - 
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rFWfBAHY ENTERED VIA A RETURN JUMP. TRANSIENT PROGRAMS HAVE 
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- BOTH TRANSIENT AND OVERLAY PROGRAMS, AS HELL AS THE RESIDENT" 
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__ ^FOLLOwInG fUgurI DETAILS THESE DIRECT CELL ASSIGNMENTS - 
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» D.FNT+1 __ * 
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• D.FNT*3 
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» D.FNT*5 

• O.FNT*6 
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WORDS 2 ANO 3 OF FNT/FST 
ENTRY FOR CURRENT FILE 
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32B * O.EST * 

338 * O.ESTtl EST ENTRY FOR DEVICE * 

3<.B » D.EST*2 BEING OSEO BV THIS PPU _ * 

"36B » O.EST+3 """' " »"" 

368 » O.ESTH. * 
»»»»♦»»♦»»»#*»*«*»*#»»*»»*•*♦»#»*#>»•»*»*»*»»*» 

37B ♦ D.DST 1D.JFLI DEVICE TYPE {JOB C« FL/10OB)* 

-■■-■■■ »¥¥¥¥¥¥¥¥**»¥¥¥¥¥¥*¥¥¥¥¥»»*¥¥¥«*¥*¥¥*¥¥*¥¥¥**¥¥ 

1.08 * O.BA .- * 

(,1B ♦ O.BAU " "FET ADDRESS RELATIVE TO LONER ♦' 

1.2B * O.BA+2 18 BITS OF INPUT REGISTER ♦ 

1.3B • 0.BAV3 " * 

<»l»8 * 0.8A*i* * 

»,»,»», »»*»»»»«»»»»»»»»*»»*»#»»»»*»»♦♦»♦»»*♦•♦» 

1.58 ♦ D.JECS CCS FIELD LENGTH/10008 ♦ 

-'•»,»,»»»»,»»#»»*,».»♦»»»»:»*»*»***«*♦♦»**»♦*•»»*»*•" 
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51B * D.PPIRBtl 

528 * O.PPIR8*2 
538 » D.PPIRO*3 
5".B » O.PPI.*8*i. * 

¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥»¥¥*¥¥¥¥¥♦¥¥¥¥¥¥♦«»¥•¥¥¥»»»»¥ 

558 » O.RA USER AREA REFERENCE ADDRESS/1008* 

.:_.. »¥¥*¥¥¥»¥¥¥¥¥¥¥¥¥¥¥¥ »¥¥♦¥•¥¥¥¥¥¥¥¥.¥¥¥»¥¥¥»¥¥¥» 

&6B » O.fL USER AREA FlkLO LLNGTH/10QB » 

¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥»¥¥¥¥¥¥¥¥¥¥¥¥¥¥«»¥¥¥¥»¥¥¥¥*¥¥»¥ 

STB * O.FA ADDRESS OF FILE FST * 
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******************** *****,**,, ¥t *tf ¥tr ^ r , 
""6QB"» Q.FIRST CIRCULAR BUFFER 

610 ♦ 0. FIRST*1 -FIRST- PARAMETER FROM FET 



********************************** *+***m 9 *m 

_62B * O.IN ' CIRCULAR BUFFER ' 

63B » TJ.INfl -IN- PARAMETER FROM FET " "« 

************************************** mmtn 

"6V8 » D.OUT CIRCULAR BUFFER « 

65B » O.OUIU -OUT- PARAMETER FROM FET « 

»*»»»*•♦*»»»»»♦««*»»»*»»»«»*»»»»*»»»»»»« 

66B * D.LIMII CIRCULAR BUFFER 

"""O.LINITVi" " -LIMIT- PARAMETER FROM FET 

»♦♦»¥***#♦*»♦*♦*♦*»»»»»*♦»»»»»«»»»»»»»»» 

CONSTANT 1 

CONSTANT 100B 

♦ <,*********♦*»»»»♦«**♦»♦»*»»»«* 
""""CONSTANT 1Q00B 

CONSTANT 3 

********* **** ****************** 

PP INPUT REGISTER ADDRESS 
*»*»»«»»»»*♦..»»»»»»»»»,»»,»»,» 

1 PP MESSAGE BUFFER ADDRESS 

********* ************ »♦***»**•* 

"CONTROL POINT AREA ADDRESS " ' 

T ~ PP STATUS WORD ADDRESS "IN CM < 

**************************** ***,*****, 
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-7W~»-TKPPMES 
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T6B * D.CPAO 

-77B »-D.PPSTA 

********* 
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IN CM » 
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252 

253 " 
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THE PERIPHERAL PROCESSOR RESIOENT PROGRAM HAS TWO MAIN 
"TUNCTIONSTO PERFORM - " " -~ : " " 

—"ALL COMMUNICATION BETWEEN MTR AND THE TRANSIENT OR OVERLAY 
PROGRAMS IS HANOLED BY THE RESIOENT. 



THE RESIOENT, WHEN DIRECTED BY MTR, LOADS TRANSIENT 
PROGRAMS' AND" INITIATES THE EXECUTION OF THESE PROGRAMS." 

—COMMUNICATION BETWEEN MTR ANO THE RESIOENT PROGRAM IS CARRIE0- 
OUT THROUGH THE USE OF PP COMMUNICATION AREAS IN CENTRAL 

MEMORY, ONE FOR EACH PROCESSOR. EACH COMMUNICATION AREA 

CONSISTS OF A ONE-WORD INPUT REGISTER, A ONE-WORD OUTPUT 

REGISTER," AND A SIX-WORD MESSAGE BUFFER. THERE IS ALSO ONE 

STATUS WORQ IN CENTRAL MEMORY ASSOCIATED WITH EACH OF THE 
POOL PPU-S. POOL PROCESSORS AOORESS THESE AREAS BY MEANS OF 
POINTERS IN DIRECT CELL LOCATIONS D.PPIR, O.PPMESI, ANO 

" MTft-ASSIGNS- "* "TASK-TO A POOL PROCESSOR BY PLACING THE REQUEST" 
IN THE PROCESSOR-S INPUT REGISTER. THE NAME OF THE PROGRAM 

TACKAGE WHICH IS TO BE LOADED AND EXECUTEO APPEARS IN THE 

HIGH-ORDER 18 BITS OF THE INPUT REGISTER. THIS NAME CONSISTS 
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_ 266~ 
267 
268 
269 
270 " 
271 
272" 
273 
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279 
28Q- 
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OF THREE DISPLAY GQOE CHARACTERS, SUCH AS 1AJ OR CIO. THE 
NUMBER OF" THC CONTROL POINT TO WHICH THIS PACKAGE IS ASSIGNED 
APPEARS IN THE LOW-OROER FOUR BITS OF BYTE ONE OF THE INPUT 

REGISTER. PACKAGE PARAMETERS, SUCH AS THE ADDRESS OF 

ARGUMENTS REQUIRED BY THE PACKAGE, APPEAR IN THE LOW-ORDER 
36 BITS OF THE INPUT REGISTER. THE PPU IS GIVEN CONTROL TO" 
EXECUTE THE CODE JUST LOADED. THE REQUEST ITSELF REMAINS IH 
THE INPUT REGISTER UNTIL THE TASK IS COMPLETED. ON COMPLETION 
OF A TASK, THE TRANSIENT PROGRAM REQUESTS MTR TO RELEASE THE 
PROCESSOR - MTR THEN CLEARS THE PROCESSOR-S INPUT REGISTER. 
THE INPUT REGISTER OF A POOL PROCESSOR IS THUS CLEAR ONLY WHEN 
THE PROCESSOR IS IOLE. - 

ALL COMMUNICATION BETWEEN MTR AND THE TRANSIENT AND OVERLAY 
PROGRAMS IS HANOLEO BY THE RESIDENT PROGRAM. MTR PERFORMS A 
VARIETY OF FUNCTIONS, EACH OF WHICH IS IDENTIFIED BY A 
FUNCTION CODE OF ONE OR TWO OCTAL DIGITS. 



TO TRANSMIT A REQUEST TO MTR, THE RESIOENT PLACES THE REQUEST 
IN ITS OUTPUT REGISTER. BYTE OF THE OUTPUT REGISTER 
CONTAINS THE FUNCTION CODE IN THE LOW-ORDER BIT POSITIONS. 

BYTES 1 THROUGH A ARE USED FOR ARGUMENTS - THE NUMBER OF 

ARGUMENT BYTES DEPENDS ON THE PARTICULAR FUNCTION. THUS, 
"FOR A REQUEST CHANNEL FUNCTION, THE CHANNEL NUMBER IS PLACEU" 
IN BYTE 1. FOR SOME FUNCTIONS, THE FUNCTION ARGUMENTS ARE 
PLACED IN THE MESSAGE BUFFER AND ONLY THE FUNCTION CODE 
APPEARS IN THE OUTPUT REGISTER. HTK REGULARLY SCANS THE 
OUTPUT REGISTER OF EACH PROCESSOR TO OETERMINE IF A REQUEST" 
IS PRESENT. WHEN THE REQUEST HAS BEEN OETECTEO, ANALYZED, 

"AND PROCESSEO, MTR CLEARS THE OUTPUT REGISTER. THE RESIOENT," 
AFTER PLACING THE REQUEST IN THE OUTPUT REGISTER, WAITS FOR 

"THE OUTPUT REGISTER TO BE CLEARED BEFORE PROCEEDING. 

THE RESIDENT CONTAINS A ROUTINE CALLED R.MTR WHICH HANDLES" """ 
THE TRANSMISSION OF FUNCTION REQUESTS TO MTR. THIS PROCESS 

REQUEST ROUTINE USES LOCATIONS O.TO-D.T* IN PERIPHERAL "" 

PROCESSOR MEMORY AS TEMPORARY STORAGE FOR THE REQUEST TO BE 

WRITTEN IN THE OUTPUT REGISTER. A PERIPHERAL PROCESSOR 

PROGRAM MAY UTILIZE THE ROUTINE BY PLACING THE ARGUMENTS FOR 
THE FUNCTION IN BYTES O.T1 THROUGH O.I*. SETTING THE 
A-REGISTER WITH THE FUNCTION NUMBER, ANO EXECUTING A RETURN 
JUMP TO R.MTR. THE RESIOENT ROUTINE HILL ENTER THE FUNCTION"" 
NUMOER IN LOCATION O.TO AND WRITE THE CONTENTS OF LOCATIONS 
D.TO THROUGH O.K. IN THE OUTPUT REGISTER. CONTROL WILL BE ~ 
RETURNED TO THE REQUESTING PROGRAM UPON MTR-S CLEARING THE 
OUTPUT REGISTER. 



WHEN A POOL 
TO LOCATION 
IOLE LOOP. 
WHEN REFERRI 
ENTRY POINT 
NAME OF THE 
PROCESSOR-S 
REQUEST IS F 
SUCCESSIVE 



PROCESSOR PROGRAM COMPLETES EXECUTION, II EXITS 
R.IOLE, WHICH IS THE ADDRESS OF THE RESIDENT 
THE ENTRY POINT TO THIS IOLE LOOP IS R.IOLE. 
NG TO A PP RESIOENT ROUTINE, THE NAME OF ITS 
IS USED AS THE NAMt OF THE ROUTINE. THUS, THE 
IOLE LOOP IS R.IDLE. IN THIS IOLE LOOP, THE 
INPUT REGISTER IS SCANNEO AT INTERVALS UNTIL A 
OUND IN THf INPUT REGISTER. A DELAY BETWEEN 
CANS AVOIfl!'. UMNFnr'lRAUv mi'miimv «ur, »;■ if. r,i/.«..,n. 
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i "ESTABLISH USE BLOCKS 



RESERVEO 
RESERVED 



STL 
STL 
STL 
STL 
STL 
STL 
STL 
STL 
STL 
STL 
STL 



467 
468 
".69 

" <»70 
471 

"472 
(•73 
<.74 
47S 
".76 
477 



-0 
I 

LU 



>v 



, I 



R.IOLE -- IDLE LOOP 



mriwr 



i 

LU 



103 

~tO«i — 

105 

"ID 6 

107 
110 ~~ 



307* 

"6016 

3017 

3077 

6ei6- 



1 1 1 

112 

-113" 



30 TT 

17B1 

0576" 



lilt - 


307<»" 


US 


6016 


116T 


" "3017 


117 


0«,71 



120 
121" 
122 
123" 



1217 

"1007- 
3U76 



CONPASS"3;T5077r 
R.IOLE 



"09/ W75~ ff<nY9u 29 



'R7T0CE 



W RESIDENT I0LE" L OOP 



CALLINCSEQUENCE 
LJM R.IOLE 



THIS ROUTINE IS THE IDLE LOOP IN NHICH PP RESIDENT CHECKS 

ITS INPUT REGISTER FORANEM ASSIGNMENT; 

If THERE IS NONE - ' 

"2ER0 PP STATUS WORD (ONLY ONCE PER ENTRY*. 

USE PP STATUS HORO ADDRESS TIHES 2 AS A QELAY COUNT 

(3308 - 3708 MICROSECONDS! . 
RE-INITIATE INPUT REGISTER SCAN. 

IF AN OVERLAY IS SPECIFIED - " 

___SET CONTROL POINT NUMBER INTO O.CPAO. 

CLEAR FIELD ACCESS FLAG IN PP STATUS H0R0~VIA"R.TAFt7 
FALL THROUGH TO R.OVLJ TO LOAO AND TRANSFER CONTROL 
"TO OVERLAY. " '- ' 



CALLS - R.TAFL" 



"USES ff.T6---0-.TH2- 



R.IOLE 



"Torr 



LOO 
CRD 
LOC 

~n;jn- 

LOO 
CHO 

X DO 

SON 

"NJN 

~L0O~ 
CRD 
LOO 
ZJN 



D.PPIR 

o;t6 ■-■ — 

0.T7 

- roLz 

O.PPSTAT 
D.T6' — 

O.PPSTAT- 
1 

"»-t 



READ INPUT REGISTER 



NO REOUE ST~CtEAR- Pp-STATOSr HORTT 
"CLEAR PP STATUS HORO : " 



"DELAY" 



D.PPIR 
0.T6 
" 0.T7 
IDL1 



READ INPUT REGISTER 



NO REQUEST, LOOP 



IOL2 



~tzatnrmr 



LPN 
SUN" 
STO 
RJM~ 



L.CPNUM 



. CPAO 
"R.TAFL " 



UPDATE PP' STATUS HORO 




G V 



^ 



>•• ■■ , _'''»^nJI'\-jv;.?'vtwrS.'*.s^^ 
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*S r T — " "PERIPHERAL PROCESSOR" RF SIOENT "' (M Alfi) 
_.RtOVLJ_-- LOAO NEW PRIMARY OVERLAY INTERNALLY 



COMPASS 3.7S077.' 
R.OVLJ 



09/10/7 5 9 V5 9. 2 9 V 
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R.OVLJ 



LOAD" NEW PRIMARY OVERLAY INTERNALLY 



CALLING SEQUENCE 



STORE 

LJM '.""'"' 

ACTIONS 



OVERLAY NAME IN 0.T6, 0.T7 

r.ovlj~; " "~ - 



125 
127" 

131 



200 773 
0200 363 

oiao looo 



R.OVLJ 



CAUSES OVERLAY TO~BELOADErJ"TSrC".PPFWft'=ir.WHCR"VrATr.OVi: 

TRANSFERS CONTROL TO C.PPFHA 

THIS ROUTINE CAN BE USEO ,BY A PP PROGRAM TO LOAD A TRANSIENT 
PROGRAM ON TOP OF ITSELF HITHOtlT CHANGING THE INPUT REGISTER. 

"c^l"ls~- r.ovl ~ ~ "" ""' ■-.--• 



LOC C.PPFWA-L.PPHOR 

RJM R.OVL LOAD OVERLAY 

LJM C.PPFHA ENTER OVERLAY 



STL 


$16 




STL 


517 




STL 


518 




STL 


519 


, 


STL 


520 




STL 


521 




STL 


522 




STL 


523 




STL 


52<» 
525 




STL 




STL 


5Z& 


* 


SC 1.0 125" 


1587 




STL 


52S 




SC0125 


1588 




SCi*0125 


1589 


1 3> 

_; r~ 

. is) 


SC0125 


1590 


STL 


529 


: i 


STL 


53 


in 


STL 


531 


LU 


STL 


532 


_. ^ 


STL 


53 3 


STL 


53<> 


, 


STL 


535 


-C 
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R.RAFL/R. PAUSE — SET GO»Uggl._g01HT FIE LD AC CESS FLAG 



-TSBHPXsrTiTmrr 

R.RAFL 



~T> 97111 775 IFK5 9. 2 97 



"PACE" 



»» 



R'.RAFC "REQUEST ACCESS" TOTHEGONTRCfU >OI«T FIECBCENCTH 



CALLING SEQUENCE 



R.RAFL 



RJM 

ACTIONS^ __ _ _ _ .__; i 

TEST STORAGE HOVE FLAG FOR CONTROL POINT ,-„-,,— «r- M 

"IF STORAGE- HOVEFLAG- SETT-CLEAR FIELD ACCESS FU6-IITIV— 

STATUS WORO VIA R.TAFL (ONLY IF FAF SET), THEN .g|«-*Y 
-"■ UNTIL STORAGE HOVE FLAG IS CLEARED. JOELAY IS PP RESIDENT 

CONSTANT «RHDELAY* MICROSECONDS). 

SET THE FIELO ACCESS FLAG IN THE PP STATUS WORO 

REPEAT PROCESS UNTIL FIELO ACCESS FLAG IS SET 

ANO STORAGE HOVE FLAG IS CLEAR. 



J 

L-< 



— -— " RETURNS 



FIELD LENGTH (FL» IN O.Ft " I"7e«o" 

REFERENCE ADDRESS tR<U W J1.RA ANO A -REGI STER 



CALLS - R.TAFL 

USES O.TO - D.Ti. 



STL 

STL — " 

STL 

STL 

STL 
"STL ~~ 

STL 

STL ~ 

STL 

STL 

STL 
"SCO 125" 

SCi. 01 25 

SC0125 

SC012S 

STL 

SC012S 
"SC.0125 - " 

SC012S 

Sd.0125 

SC0125 

SC«ai25 

SC 1.0125 
"STL 

STL 
"" SC40125 

SC"*0t25 



537 

538~ 

539 

51.0 _ 
Si.1 
"5 ".2" 

Si. 3 

5W5 

51.6 

51.7 
1592 
1593 
1591. '" 
1595 

550" 
1596 
1597~ 
1598 
1599 
1600 
1601 
1602 
'■' 552" 

553 
1603 

1601. 



R. PAUSE EQU R.RAFL 



"133" 
13* 

-135 
136 



"~3ffi<r 

3«»56 
— WIT" 

3<.55 



-RAFtX" 



"LEO 
STD 

"LOO " 
STD 



137 



0100 0000 



R.RAFL 



140 



R. PAUSE 



ENM 
EQU 



"DiTOttr.CPFL" 
O.FL 

D.T0»C."CPRA~ 
O.RA 



R.RAFL 



RESET FL 



RESET RA 



11.1 
1". i. 



5008 0100 

T376 — 

513 



LOH 

LMO" 

NJN 



11.5 
"Ui6"' 
11.7 
150 
151 

152 



3076 
-T62TT 
6018 
3012" 
fli.61 



RAFL1 



0200 0173 



151. 
155 
156 



11.62 

1701" 

0576 



RAFL2 



LDD 
"ADNT 
CRO 
LDO" 
ZJN 

RJM 

LDN 

' SON 

NJN 



R.FAF 

D.CPAD 

RAFL3 fAF _15_ M0T SET. TEST ST ORA GE MOV E FL G 

D.CPAO ■ _ . 



~W"CPSTA"T~ — 
O.*T0 REAO CONTROL POINT STATUS JtORO 

O.T8*C.CPSM"7" 

RAFLX _ 



R.TAFL 

RWOELAY/2 

""' 1 "" 

*-l 



CLEAR FIELO ACCESS FLAG 



DELAY RHOELAY MICROSECONDS 



ML 
STL 
STL 
STL 
STL" 
STL 
STL ~ 
STL 
STL 
STL 
STL 
STL 
"STL- 
STL 
STL- 
STL 
STL- 
STL 
STL- 
STL 
STL- 
STL 
STL 
STL 
STL- 
STL 
STL- 
STL 



-555— 

556 

559 

560 

561" 

562 
"563" 

561. 

565 

566 

567 

568 

569" 

570 
571 " 
572 
573" 
57". 
-575- 
576 
577" 
578 
579 
58 
" 581" 
582 
583 
581. 
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Trt — - "PERIPHERAL "PROCESSOR RESIDENT "IMAINI 

R.RAFL/R. PAUSE — SET CONTROL POINT FIELO ACCESS FLAG 



COMPASS 
R. PAUSE 



3.76077." 



09/10/75 M. :59."2 *r 
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"16" 



15r — 


3076 


160 


162 i> 


1 61 ■'"■ "'" 


6010" 


162 


3012 


163 


"0570 



RAFL3 



I 

-C 

ru 



"1" 6". " 
166 
167" 
170 

"1 71 



3076 

5<.O0 0100 
"3077 
6276 

"0353 ~~~ 



LOO 
AON 
CRO 
LOO 

"NiN 

"LOO" 
STM 
LOO 
CWO 
UJfl" 



O.CPAO 

N.CPSTAT 
O.T0 '-" 
O.T0*G.CPSH 
"RAFL2 

O.CPAD ; 
R.FAF 

O.PPSTAT" "~ 
D.CPAO 
""RAFC1 l ~ 



"WAIT" FOR STORAGE MOVF FLA1TTD BLEAR 



SET FIELO ACCESS FLAG 
UPOATE PP STATUS WORD 



STL 
STL 
STL 
STL 
STL 
"STL" 
STL 
STL- 
STL 
STL 

STL 
- STL ~ 



585 
586 
587 

588 
589 

"590" 
591 
692 
593 
59"» 
595 

"596 



-i T> 

r~ 

n 

i 

In 
LU 

Hi 
i 

ru 




E>» 



M : - 



MMmxwtit^^ 



M •■ Ml Mi Mi 



'MPAS 
' TAFL 
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CALLIN6_SEQU£NCe ""- 

, R _J.1 _ R. TAFL ; 

AcnoN ". ; — 

--^^-^^^^ 

EWM~ x 

LtW_ 

S'T'N- ~ ' ft ~t?AC • 

loo oIppsiat CL EAft fieco access- flag 
xm~ ovcpw- 

0J « R.TAFLX 



J 





I 

In 

Ui 

I 

-0 

I 

4T 
LU 



S T L 
R.TEL 



PERIPHERAL PROCESSOR RESIDENT 
COMPARE A-REGISTER TO FIELD LENGTH 



(MAIN) 



COMPASS 3.750 77. 
R.TFL 



09/10/75 09.59.29 



* 

* 

* 

* ■ ■ ■■ 



R.TFL COMPARES" ACCUMULATOR TO FIELO LENGTH 
CALLING SEQUENCE 



LOAD 
RJM 

RETURNS 



VALUE 
R.TFL 



ACCUMULATOR=VALUE+RA IF VALUE IS LESS THAN FIELO LENGTH 
ACCUMULATOR=-0 OTHERWISE 





20 2 


1014 




20 3 


515 6 


.n 


i 20 <♦ 


315 5 


l 


i 205 


100b 


■■ ■ -c 


1 




jr 


1 






| 20b 


100 000 


I 


210 


0705 


■■ ■ ■■ 


"2'1T 


ioi'f 




212 


325 b 




215 


1006 




214 


0765 




215 


1500 




"216" 


"~ 0367' ~" 






" ■"' "' ■■■--■ -* *- *—■ - 



TFLO 



R.TFL 



TFL1 



SUN 
ADO 
ADD 
SHN 

ENM 



12 

D.FL 
O.RA 
6 



MJN 


TFL1 


SHN "■" 


12 


SDD • 


D.FL 


SHN " ■- 


6 


MJN 


TFLO 


LCN 





UJN "*"■" 


RVTF 



ADD FIELD LENGTH 
ADO RA 
REPOSITION VALUE 



JUMP IF NEGATIVE 
POSITION TO HUNOREOS 



SENSE IN RANGE 
ERROR RETURN 
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STL " ---- -PERIPHEftAV PROCESSOR RESIDENT ' 
i^I5- / ll P _^£!i_--_I5SUE MONITOR. FUNCTION 



~IMAIN> 



PASS 3.75077. 
.MTR 



09/10/75 09. 59V29; 



»* 
* — 






R ' MI R ISSUE MONITOR FUNCTION" 

JCALLING SEQUENCE 



(STORE 

"LOAD 

RJM 

ACTIONS 



R.MIR 



PLACE FUNCTION COOE IN O.TO 

HRITe FUNCTION IO.TO - 0.T4J TO PP OUTPUT RFrT<!TCD 

JL««_^_£W?HI _5»isi« jo jlem ^mwtio^cI"™ 

RETURNS 



£?. N J£Nli_£F .. «?!?"! WEWSIS* II o-to-o. T* 



CALLS - R.WAIT 



_R.PROCES.EQU R.MTR 



~zrf 



01DT 00W 



-?2or 



RTMTR tHM 

"RTPHTOCES— EQU- 



"X — 
"RTWTTT 



.J] 
I 

J= I 
Ln '^ 

I 



o 



■'221- 
222 

~223~ 
22<< 



307!. 

-1601— 

6210 



NAMrT)F-INTRr~P0INT— 



"STO- 
LOO 

~»'0IT 
CWO 



225 
227 



-TJ.TO 

O.PPIR 

w. ppor-^m; ppir- 

O.TO 



_0200 0231 
0367 



WRITE OUTPUT REGISTER 



RJM 



R.HAIT 



UJN 



R.MTRX 



-^ A iIZ? R ..?_ UN GTION ACCEPTEO 
EXIT 



PAGE 



STL 

STL •-"" 
STL 
"STL 

STL 

— sr( _ 

STL 
"STL — — 
STL 

- STL 

STL 
-"STL"— 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

~5TL~ 

STL 

STL 

STL 

STL 

SC<,Q125 

-STL 

SC40125 

STL 

STL 

STC 

STL 

STC 

STL 

STL 

STL 
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6l>7 
6«.8 
6<.9 
650 
651 

"652" 
653 

"65<.- 

655 

656 

657 

" 658" 

65 9 
660 
661 
662 ~ 
663 

"6ST- 
665 
666 

66 7 



~669~ 

670 

671 

672 

" 673" 

1610 

~67$- 

1611 

675 

676 

677 

678 

~679~ 

66 a 

-68 f- 

682 
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n 

Ln 

LU 

I 

~a 

-c ■ 
Ln 

' f 
i 



•* =. ^-v*>.»*«^^.*-«.,^^ 



'mmwswimwmmmi 



i *'**^ a *^^^^ 
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' vie a f a u£ ti nt 



liartrrccftO'o'cClhtuT 



rnwoACc ». T5S77. 



" flQAt (I /»« no. K«. _ >0. 
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~S T "L~ 

R.HAIT 



-- PERrPHERArPROCESSOR RESIDENT (MAIN! 

WAIT FOR PP OUTPUT REGISTER TO CLEAR 



COMPASS 3.75077. 
R.WAIT 



'09/'i0775".;«'9Y59V297 PAGE 



20 



"R.HAIT 



WAIT FOR OUTPUT REGISTER TO CLEAR 



GALLING SEQUENCE 

RJM R.WAIT 
ACTION 

determine if the monitor function is to be processed by ppmtr^ 
or cphtr. " "" " ~" 

if cpmtr, hrite the input register address into t.ppio. 
read and execute t.mxnctl. t.mxnctl is maintained by cpmtr 
and is used to determine to which exchange package aooress 
an mxn should be issued. 



J] 



a~ 



IF PPMTR, WRITE THE INPUT REGISTER AOORESS INTO T.PPIP. 

AT DEADSTART TIME STL DETERMINES IF THE MXN MAY BE USED. 
IF NOT, R.HAIT IS MOOIFIED TO TREAT ALL FUNCTIONS AS PPMTR 
FUNCTIONS. 

FOR ALL FUNCTIONS, CPMTR OR PPMTR - 

WAIT FOR OUTPUT REGISTER TO CLEAR AND PAUSE FOR CM 

RELOCATION IF THE STORAGE MOVE FLAG IS SET 

CALLS - R. PAUSE 



230' 

232 ~ 
Z33 



"0100-0000"" 



-R.'HAir 



"3 MO - 

1713 
~0 70V" 



WAIT2 



ENM 

LOO 

SBN 

"MJN- 



D.T0 
M.NTRCPU.U 

"WAIT2A " ; 



SKIP MXN IF FUNCTION CTR .THAN M.RCH 



-235" 
236 
T237- 

-2-.0- 
2i*l 



-m5o~ 

627 

"0315- 

1'4'V7 ' 
6270 



-HAIT2A" 



2V2 

"2h3" 

2<*t 
- 2 i,5- 

2-»7 
-251- 



11.01 

3 via 

l^^o 

~&uo~!rew- 

2000 0000 
2610 ~~ 



-VAI TV- 
WAITS 
-WAIT5A" 



-252- 
253 

-25T 



"H24- 
1701 

"0576"" 



WAIT6 



~LON" 

CHO 
"UJN" 

"LON 
CWD 

LON 
•"STD"- 

L0N 
~GRM" 

LOC 
'"MXN 

"LDN 

SBN 

"?JN~ 



"T.PPIP "~ 
O.PPIR-V 
WAIT6 

T.PPID" 
O.PPIR-V 



1 

"D-.T0 

T.MXNCTL 

*"HAIT«i7D«m»" 

♦-* 

_ o 

20 
1 

~WAIT& "~ - 



"READ- THE MXN CONTROL WORD ~ 
LOAD EXCHANGE JUMP AOORESS 



\* 



-255- 
256 



-J07TT 
1601 



VDO - 
ADN 



OiPPIR" 

W.PPOR-M.PPIR 



STL 

STL 

STL 

STL " 

STL 

STL " 

STL 

STL 

STL 

STL - 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL ■""" 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL "-" 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

"STL 

STL 
STL 
STL 
STL 
STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

FEAT65A" 

STL 

STL 

STL 

STL 

STL 
STL 
STL 



68V 
685 
666 
687 
688 
689 
690 
691 
692 
693 
69V 
695 
696 
697 
698 
699 
780 
701 
702 
703 
70H 
705 
706 

"707 
708 
709 
710 
711 
712 
71V 
715 
716 
717 
718 
719 
720" 
721 

"722 
723 

"72 V 
725 
726 
727 
728 
729 
730 
731 
732" 
733 
11 
735 
736 
737 
738 
739 
7V0 
7V1 



•C i 
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R.WA1T — WAIT FOR PP OUTPUT REGISTER TO CLEAR 



257 

-2oon 

261 



262 

"265" 



2 65" 



"267" 
270 



6010 

Tronr 

0-»+6 



CRD 
XOIT 
ZJN 



500 



0100 



LOH 
ZJN" 



Tr2Do~Dr«itr 



~l"<i52" 
0362 



WAIT7- 



RJH" 



LOW 
UJN 



D.TO 

— ovrff— 

R.HAITX 



R.FAF 
-RSTT7" 



ft. urn 



-Vfrn7rr~vsz&i7irr 



-mer 



~rr 



-rvrafl 

— rhoelay/z: 

HAIT6 



READ PP OUTPUT REGISTER 



EXIT NHfcN ZERO 



STL 

— STL~ 
STL 

"■"'" STL- 
STL 

JUMP" IF" FIELD "ACCESS- FLXGTIOT^ET STL 

STL 

— STL 

STL 
STL- 
STL 



PAUSE FOR RELOCATION 



712 
- rvT - 

71.1. 
-74 5" 

71.6 

-71.T- 

71.8 
7 i,g 

758 
751 
752 
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L 



S T L 

R.RCH 



---" peripheral Processor resident 
reserve channel 



« MA IN J 



COMPASiS 3.75077," 

K«1vCr1 
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R.RCH 



"RESERVE CHANNEL 



CALLING SEQUENCE 



LOAD 
RJM 



CHANNEL. NUMBER 
R.RCH" 



RETURNS WHEN ASSIGNMENT COMPLETE 



-D 
I 

-C 
Oa 



-SINCE MORE THAN ONE PPU CAN BE REQUESTING THE SAME CHANNEL 
AT THE SAME TIME; IT IS NECESSARY TO USE' A"HONTTOR FUNGTIQN 
TO RESERVE A CHANNEL. 

CHANNELS WILL BE ASSIGNED BY MTR ON THE FOLLOWING 
"PRIORITY BASIS : - "" " — 



" Q.TO 



O.T1 



0.T2 



D.T3 



0.T4 



"* * 2 / i ♦ 4 / 3 * ♦ 



I! 



IF ALTERNATE CHANNELS ARE SPECIFIED, MTR HILL STOP LOOKING 
FOR ALTERNATE CHANNELS AFTER 4 CHANNELS HAVE BEEN INVESTIGATED 
OR UPON SENSING 6 BITS OF ZERO. THUS, IF ONLY ONE ALTERNATE 
CHANNEL IS OESIREO, tt).T2> HUST BE SET TO ZERO BEFORE 
ENTERING R.RCH. 

MONITOR INDICATES THAT A CHANNEL IS RESERVED BY STORING 

THE ADDRESS OF THE INPUT REGISTER OF THE PP RESERVING 

THE CHANNEL IN BYTE 4 OF THE CHANNEL STATUS TABLE 

ENTRY FOR THE CHANNEL. - 



STL 

"STL 

STL 

"STL 

STL 
"STL 

STL 

STL 

STL 

STL 

STL 
"STL 

SC40125 

SC40125 

SC4Q12S 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 



"CALLS - R.MTR 



2 71 



11 



302 
'304" 

305 
"306" 

307 

311- 

312" 



0100 0000 
"3411 

1412 
"341V 



R.RCH 



0200 0220 
"0370" 



IT" 



BSSZ 


R.RCH-*-l 


ENM 


X 


STO- 


O.T1 


LON 


H.RCH 


"STD " 


O.T4 " 


RJM 


R.HTR 


"UJN "" 


"R.RCHX 


"BSSZ" 


"~R.DCH-*-4 



SPACE FORMERLY USED BY ILR 



"CHANNEL" NUMBER ~ 

DO NOT RETURN WITHOUT RESERVATION" 
ISSUE REQUEST CHANNEL 



SPACE FORMERLY USED BY ILR" 



STL 

STL 

STL 

STL ""'■• 

STL 
~ SC40125" 

SC40125 

SG40125 

SC4B125 

SC40125 

STL 

STL "" 

STL 
"STL 

FEAT75A 

STL ~ 

STL 

STL -" 

STL 

STL 

STL 

STL - 

FEAT75A 

FEAT75A 



754 
755 
756 
757 

750 
759" 
760 

" 761 
762 

"763 
764 

"770 

1614 

1615 

1616 

771 

772 

773" 

774 

775 

776 

777 

778 

"779 
780 
78 1 
762 
703 
784 

1617 

1618 

1619 

1620 

1621 
785 
786" 
787 
788 
20 
797 
798 
799 
806 

"807 

808 

80 9 

21 

22"" 



H 

Ln 

LU 

I 

-13 

I 






■j . 



V J 



"I l L TERIPflnaL-pROCESSOR-RrSIDENT 

R.DCH — RELEASE CHANNEL RESERVATION 



(MAIN* - 



I 



C0HPASSTU.-75077. 
R.DCH 



o 9/io/ 75 09. s 9;«; 



TAcr zr 



ii w 

i i 

r 

1 * 






~R;uci 



DROP CHANNEL 



CALLING SEOUENCE 



LOAD 

RJH 

ACTIONS 



CHANNEL NUMBER 
R.DCH -• 



^^^n HE CASf 0F REQUESTIfre-JT CHAWNErrTHr-ONLT-pp-HHTCTr- 
5£2.5 E tf * SE * CHANNEL 1S THE PP "HICN RESERVED IT. 

THERE IS NO NEED FOR AN INTERLOCK. " * * — - 

"(THE FHA OF THE CHANNEL STATUS TABLE IS INSERTED "" 

JlI5Ii«2!!I?NE.BI2Sff AT OEAOSTART TINE?. 



CHANNEL STATUS TABLE IS UPOATEO TO INOICATE THAT THE 

CsJ N E N NTRj S I N RE fl vrr. S L° R J NG ™ E AD ° RESS ^ THE^JpROPRIATE 
CST ENTRY IN BYTE <♦ OF THAT CST ENTRY. 

(BEFORE ALLOWING PP TO RELEASE CHANNEL, DETERMINE" IF PP " 

_ HA ?. CM i. M «i ANO ISSUE M.KILL VIA R.HTR IF NOT). 

I -THE FWA OF THE CHANNEL STATUS TABLE IS INSERTED 

IN THIS ROUTINE BY »STL* AT OEAOSTART TIHE> r ' 




STL 

STt 

STL 

STL 

STL 
-STt 

STL 

STL 

STL 

STL ™ 

STL 
~SCiO : lJ»5" 

SCV0125 

SC<»0125 

SCI.01Z5 

SC<.01?5 

SCV0125 

SC012S" 

STL 

SCV0125 

sea 125 

SC0125 

SCV0125 

SC-»0t25~ 

SCO 125 

SCV0125 

SC<«01ZS 

SC<iDl25 

STL 

STL 

STL 

STL "■•-- 

STL 

STL ■- 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL" - 
FEAT75A 
FEAT75A— 



811 

"" 81 2~ 
813 
81<T 
815 
"816" 
817 
818" 
819 
820 "" 
821 
"1627" 
1628 
1629 ~ 
1630 
1631- 
1632 
163 3~ 

822 
163V"" 
1635 
1636 " 
1637 
1638 - 
1639 
161.0 " 

i&m 

16<»2 " 

82 V 
'825~ 

826 

827 ~ 

82 S 
829 
830 

"831"- 
832 
833 ~ 
83V 
835 ~ 
837 

83 5 — 
839 
BVO — 

23 
- 21, ~ 



— <: 

■ 3> 



n 

Ln 

LU 

i 

I 

; -c 

! _D 



> 



o 



CI ! 



1 

til 
□ 



otitoutOAi ojftnc^nu Dt^mcuT ~~ imatwi 



imimp»<:<; s.rsnrr." no/ia>7<> ft*. ««.">«': " 



PAW 



tA 



ti 



^y 



R.STB 



---"" "PERTPffERAL""PRae£SS0ft"RESIDENT 
MASK (BYTE INTO LISTED WORDS 



(MAIN) 



COMPASS 3. 751) 77. 
R.STB 



a*/ i(t/t$~ir. 59."?«; 



PAGE" 



R.STB MASKBYTE INTO LISTED WORDS 



CALLING SEQUENCE 



LOAD 
"RjM 



L(LIST) 
R.STB 



WHERE LIST HAS THE FORM " """""' 

LCeVTE»,LIHORDl»iL<WORDe»VI.;rrwO«DMr,¥ 



AN ENTRY POINT TO R.STB CALLED R.STBMSK IS THE" ADDRESS" OF ~~ 
THE MASK -ANDEO- WITH EACH WORD IN THE LIST BEFORE THE WORO 
IS -EXCLUSIVE ORED- WITH THE BYTE. THIS MASK IS INITIALLY" 
77D0B AND THIS VALUE SHOULD BE RESTORED OY ANY ROUTINE 
"WHICH SUBSTITUTES AN ALTERNATE MASK. ' 



USES D.ZO 



D.Tfl D.T2 



31.3 



-3UT,- 
3«.5 



31.7 

358 
351 
332" 
353 

351. 
356 
357 
"3 6B"' 
361 



31.12 

-liorz- 

2200 7700 



1.300 
1.1.12 
3610 
"1.0 10 
0567 



"346 



STBO 



"KYSTBHSK 



0100 0000 
3410 ~ 

1.010 

"3400 """ 
0367 



ST61 



R.STB 



STD 
LOI 
LPC 
EQU 
LMI 
STI 
A OO 
~L0I" 
NJN 

ENM 
STD " 
LOI 
"STD' 
UJN 



O.T2 
D.TZ " 
7700B 
•-1 


0. 

0. 

"D. 



T2 
TO 
TO 
STBO 



SAVE WORO LOCATION 

FETCH WORD 

CLEAR BYTE FIELD 

HAY BE USED TO CHANGE BYTE MASK 

OR BYTE INTO WORO 

RESTORE WORD 

ADVANCE IN LIST 



D.TO 
D.TO 

"0" 

STB1 



SENSE NOT END OF LIST 

STORE BYTE FOR I/O CHANNEL 

SAVE LIST LOCATION " 

FETCH BYTE LOCATION 



STL 
"STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 

STL 
" STL 

STL 

STL 

STL 
"STL 

SC0125 

SCi.0125 

STL 

STL 

STL 
"STL 

STL 
"STL - 

STL 
"STL 

STL 
-STL 

STL 

STL 

STL 

"STL 

STL 

STL 

STL 



"25" 



S'»2 
Si.3 

" fti.5 

8U6 

"fli.7" 
81.8 
81,9 
850 
851 
852 
853" 
851. 
855 
856 
857 
858 
859" 

16<»i. 

161.5 
860 
861 
862 

"86 3" 
86 U 
865 
866 
857 
868 
869 
870 
871 
872 
873 
87i» 
875" 
876 



r* 

n 

i 

Ln 

LU 

I 

JJ 

I 

Ln 



»* 



." ■.-■tr , *-r ,t, r*?*9 ■WJi'f* t" 1 ' T7 "*"(*:.';•;*?! -■.■;*^{iV-'ir** | :TV'* rtt ^^'T 



.„ ,,,.; V .,.*,, ; ^ ,, ,_„. -^-J, -J 



'/sit* ftir"*?-* fwt-^,9 



L"*ti./i!iMi.»,r*v i * 



R.OVL -- LOAO PP OVERLAY 



Tiarwr 



"COMPASS 3.75077". 
R.OVL 



'vinnfsr 09.59.29; 



p*cr 



25 



R.ovtr 



"CBATJPP OVERLAY 



CALLING SEQUENCE 



STORE 
T.OAO " 
RJM 



OVERLAY NAME IM 0.T6.0.T7 
AOORESS TO START LOADING OVERLAY 
R.OVL 



ACTIONS 



LOCATIONS BEYOND R.QFH AREA 1737 - 772) ARE USED FOR 

"THIS FUNCTION. " — " - T— 

ISSUE ft N.ICEtEX.Ptiai FUNCTION WITH THE ROUTINE NAME ANO 
"LOAD AOORESS ANQ HAtT UNTIL II IS ACCEPTED. THEN WATT UNTIL 
BYTE OF MESSAGE BUFFER WORD 3 BECOMES NON-ZERO. 

IF IT IS 1, THE ROUTINE: IS OISK RESIDENT ANO THIS TS THE 

START OF NORMAL COMMUNICATION WITH THE STACK PROCESSOR. 

"THE ROUTINE IS WAITING IN THE 1SP-S BUFFER TO BE LOADED 

THROUGH THE SPECIFIED CHANNEL. 

"TF IT IS 5. THf ROUTINE IS CM RESIDENT AND BYTES 1 AND 2 

GIVE CM AOORESS ANO BYTE k GIVES ITS LENGTH IN CM WORDS. 

"IF IT~IS~GREATER THAN 5, THEROUTINE IS ECS RESIOENTAN0 

PPOR BYTE 1 GIVES NUMBtR OF PRU-S IN THE BUFFER. ANO 

MSG3 ANO M5GI, GIVE STATUS OF SYSTEM BUFFER AS FOLLOWS. 

MSG3 - 18/ECS DESCRIPTOR WORD OF ECS RESIDENT LIBRARY, 

" 18/ASSIGNED SYSTEM BUFFER €NTRY AOORESS, 

6/0, 18/PPNTn ADDRESS. 

- MSGV - 1/0, I/OOP FLAG CI IF OOP TYPEI, iO/O, " 

6/Z0B, 18/PRU DESCRIPTOR FWA, 

.21. /CM DATA BUFFER ADDRESS IF CM BUFFER TYPEjTOR 

OOP CHANNEL NUMBER IF OOP TYPE. 

AT THE START OF ECS PROCESSING, R.OVL WILL CHECK THE TYPE 

OF ASSIGNED SYSTEM BUFFER, ANO IF THE LOADED ECS DRIVER 
"15 NOT OF CORRECT TYPE, IT WILL LOAD THE OTHER DRIVER"FROM~ 

CM SAVE AREA. THEN IT HILL READ IN THE PRU-S SPECIFIED IN 
"PRU DESCRIPTOR AREA UNTIL A SHORT PRU, FROM CM OATA AREA OR" 
THROUGH OOP. THEN IT WILL ISSUE H.ICE <EX.PLIB» WITH 

BYTE 1 = 0. THIS HILL REQUEST CP MONITOR TO RELEASE THE 

ASSIGNED SYSTEM BUFFER. R.OVL WILL EXIT WHEN PPOR IS ZEROED. 
"COMMUNICATIONS BETWEEN R.OVL ANO CP MONITOR FOR A8NDRHAL ~~ ~— 
SITUATIONS ARE - 

" M.ICE(EX.PLlB) WITH BYTE 1 

= 1 -- NO SHORT PRU, CONTINUE LOAO BUFFER 

= 2— ACCESS TO ECS THROUGH OOP IN TROUBLE 

* 3— NO OOP DRIVER AVAILABLE FOR R.OVL 

""'='•" NO ECS DRIVER AVAILABLE FOR R.OVL 

FOR VALUES Z-<t CP MONITOR WILL SET UP STACK REQUEST 

TO LOAO THE ROUTINE FROM THE DISK. 



USES D.Z1 - D.T7 



362 

36". 



4 • 



0100 0000 
0100 737 



R.OVL 



ENM X 

LJM OVLA 



STL 

STL 

STL 

"STL 

STL 

STC 

STL 

STC 

STL 
STL 
STL 

"STt 

FEAT75A 
FEAT75B ' 
FEAT75A 
FEAT75A 
FEAT75A 

"FEAT75A 
FEAT7SA 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 

"FEAI75A 
FEAT75A 
FEAT75A 
FEAI7SA 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A" 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT7SA 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 

"FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
STL 

STL 

STL 
STL 
FEAT75A 



878 
879" 

88 

881" 

882 

~883" 

881, 

"885 

886 

887 

868 

"889" 

25 

26" 

27 

28 

29 

_ 30 

31 

~ 32 

33 

- 31," 
35 

— 36" 
37 

- 38 
39 

-1,0 

dl 
~ «.2 

<>3 

— kk - 
■.5 
1.6 
«.7 

~I»B~ 

«.9 

750 

51 

--52- 
53 

— 5<f~ 

55 
_ g6 . 

57 

-58~ 
59 

~60~ 
61 

—62- 

63 

6V 

901 

"902"- 

90 3 

'901, -• 

65 



i <: 

IV 

Ln 

LU 



Ln 



I 

in 
ru 



s r I 

R.OVL 



366 

36? 
~37<T 

371 
372 

373 
374 
375 
"376 
377 
600 
402 



^"I,„ * S | RI>HrRAl - PROCESSOR" RESIDENT- 
LOAD PP OVERLAY 



tMA'lHY 



COMPASS*" 3. 750 77. 
R.OVL 



B9V10/75 09:59.21"; 



PAGF zT* 



FR0HOVL A" RETURN TO OVLB 



404 
"405" 
406 
407 
410 

412 



"1702"" 

0615 
~ 36IT 

3075 

160 2 

6213 

3017 

106a 
"0463-* 

1422 
"0203 0220"" 

0100 0103 

0507 

3014 

1014 

3115 - 

6117 00 

0347 



OVLB 



SBN 2 

PJNOVLC 

aoo - o.mc.Rwppcr 

LOO Q.PPMES1 

AON " : H.RKPPCM "i "~ 

CWD O.T3 

LDC O.T4*C.RWPPST 

SHN -9 

■ ZJN ""R.OVCX ' 

LON M, ABORT 

RJH "R.MTR - 

LJM R.IOLE 



4 IT 



413 

413 

"414" 
415 

"416- 
417 

""420- 
421 



OVLC 

OVLO 
OVLC 



3006 
"0445- 

3075 
"To 03" 
6001 
3001" 
1007 



NJN 
"LCD 
SHN 
* AOC1 
CRM 
EQU 
UJN 

BSS 

LOO 

ZJN 

LOO 
-AON - 

CRD 
"LDC - 

SHN 



OVLE 

"-'D.r4" 

12 

**.0.T7 
R.OVLX 



0.26 
R.OVLX 

O.PPMES1 
~"3 

0.21 
~"0.71 

7 



JUHP IF NOT OISK RESIDENT 
RELEASE* ISP - 



RETURN TO CALLER IF NO ERROR 
EXIT TO IDLE 
- JU . H L IF . EGS RESIDENT 

READ CM IF CH RESIOENT 
RETURN 



SAVED PPOR BYTE 1 HAS PRU COUNT 
RETURN IF END OF ECS READ "" 

-READ PP COHMUNICATION AREA-HES* ~ 
TO CHECK OOP FLAG 



422 

~422~ 

422 



422 
-423" 

424 
"425" 

426 



0707 
"1413 

3410 
1*404 
0310 



R.ECOVL 

~BASEVr~ 

S.SEG0 

ERROOP 

" ERRNODP 

ERRNOEC 

ECOVL 



EOU * 

EQU » 

EQU * 

EOU 2 

EQU 3" 

EQU 4 



MJN ECOVLA 

LON LSEGl 

STO D.T8 

"LON; ERRNOEC 

UJN ISSUERR 



ERROR IN OOP ACTIVITY 

NO OOP OVERLAY " 

NO ECS OVERLAY 

JUHP IF THROUGH OOP 

SEG LENGTH OF SEG-1 I ECS OVERLAY! 

ERROR - NO ECS CODE AVAILABLE 



"427 



431 
432 



6110 U422" 

1400 

3410 



426 



» - 

CHSOt 

CCOVLB 

ECOVLA 



r0C C fsEG G , T ^w P IN ?I^ C I I0NS HIU 8E ^PLACED BY 

LOC IStC-1 SAVE AREA IN CM» WHEN OVERLAY SEG-1 IS SAVED. 



EOU 
CRM 



LON 

STD 



*-l 

ECOVL »0. TO 

LSEC2 
O.TO 



LOAD ECS/ODP DRIVER 



FEAT75A 
FEAT75A 
_ FEAT75A 
FEAT75A 
_ FEAT75A 
FEAT75A 
FEAT75A 
" FEAT7SA 
FEAT75A 
' " FEAT75A 
FEAT75A 
_ " FEAT75A 
FEAT75A 
' " FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
"FEAT75A 
FEAT75A 
FEAT75A 
FEAT7SA 
FEAT75A 
FEAT75A 
FEAT75A" 
FEAT75A 
FEAT75A 
FEAT75A 
"FEAT75A 
FEAT75A 
"FEAT75A 
FEAT 75 A 
**" FEAT75A " 
FEAT75A 
FEAT75A — 
FEAT75A 
"FEAT75A 
FEAT75A 
"" FEAT75A — 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A " 
FEAT75A 
FEAT75A 
FEAT75A 

FEAT75A 

FEAT75A 

FEAT75A "' 

FEAT75A 

FEAT75A 

FEAT75A 

FEAT75A 

FEAT75A 

FEAT75A 

FEAT75A 

rr.U7'A 



66 
67 
68 
69" 
70 
71- 
72 
"73 
74 
75" 
76 
77- 
78 
~ 79 ~ 
80 
81 ~ 
«2 
83 — 
84 
85 - 
86 

87 - 
88 
"89"- 
90 

91 - 
92 

93 ~ 
94 
"' 95 — 
96 

97 — 
98 
'" 99 — 
100 
101 — 
102 

103 

104 

105 

106 

"107 

108 

10 9 ~ 
110 

lit ~ 
112 

113 

114 

115 

116 

117 

118 

119 - 

120 

t?1 



— < 



H 
. I 

in 

LU 

I 

-D 

I 

in 
ru 



— *>*. ' 



~srrr. — ~- 

R.OVL — LQAO PP OVERLAY 



piRt(>H£R"Airpi?o^ErsoR~ftrsioEtjr~iiflJ««rr 



" coHPinsm;?5o rrr 

R.OVL 



~ 9/ iV/rS~6 975 9". 2 9 ." 



"T»*sr" 



-jj 7 - 



433 

"4"3TT 



1403 



LON 
TON" 



ERRNOOP 
TSSOERR 



ERROR""-" N(T OOP CODE "AV AICHBLE" 



PRECEDING THO INSTRUCTIONS HILL BE kEPLACEO BY 
XDC _ TSEC-2-SAVmfRrA _ INCHr'HHEN-OVEREAir-SE(r-2~rS-SAVEa; 



435 
-435" 



0371 

~imnrTJ75ir 



vzz~ 



-a 1 

1 l 

in I 

LU I 



"L~— «.22" 
L 423 

C — 424" 



L J*25 

L 427 



L 431 
L" 432 

L 43". 

L 437 

E 440" 

L 442 
- c - 443 
L 444 
C — 446" 
L 450 

t 451 

L 453 
L •— 454 - 







455 
457 
460 

"5o2" 
4o3 
464 
465 
466 
467 

"470* 
471 
472 
47". 



22 
-~3T 



"CMSTZ- 

ISSUERR" 
XLSEGO 
XSEGO 



UJN ECOVLB 

LJM "ISSUE 

SET ♦-BASE. 1*4 

"TQU XLSEG075 



END OF SEGMENT 



2171 



".ECS" 



S.SEG1 



TFNE 
USE 



EQU 
"COC" 



EGSLIB.O 
PPOLAY 

♦0 
"BASE."! 



"1T6ir7~ 

1400 
-341TT 



ECOVL" 



PJN 
LON 
STD" 



TCOVLA 
LSEG2 
Q.TO" 



JUMP IF" NOT THROUGH DDP 

SET LENGTH OF SEG-2 (OOP OVERLAY* 



"NEXT"INST RUCT ION~BEEO HES~TTJC~TSEB-2~S AVEO""AREA ~TN XflJ" 
WHEN OVERLAY SEG-Z IS SAVED. 



0100 0507 



6110 0422 



~ZI~75" 



CMSr 



LJM NOOOP 
■ E Qlf » - 1 ♦ S ; S EG1 -B A S E i 1 

CRM ECOVL.D.TO 



3007 
"5400~0«75 

3002 
~540 0~0 455~ 

3003 
~5TJ0 _ ff45"e- 

300 4 
-1277 

2100 2000 
"5400-0 4T2- 

300 5 
"5400-0 4T3" 

1400 



ECOVLA 



-3410 — — 

2000 0000 
-6001- 

5600 0456 
"3003" 

3610 
"300 3" 

1071 

340 3 " 

0-0 3 
"370 6 

0563 

20 00 0O0 

6110 0000 



SOBLOOP 



SOBOATA 



LOO 
STH 
LOO 
STM" 
LOO 
"STM 
LOO 
LPN~ 
AOC 
STH- 
LOO 
STH 
LON 
STO 
LDC 
CRD 
AOM 
LOO 
RAO 
LDO 
SHN 
STO 
ZJN 
SOD" 
NJN 
LDC 
CRN 



D.Z7 
"SOBLOO '""" 

D.Z2 

SOBLOOP " 

O.Z3 

SOBLOOPtl- 

0.Z4 

77B — . — 

.LDC. 
~SQB0ATA r — 

0.Z5 



SE t PP" ADDRESS~~OF START OF~LOAOIfrG 

SET PRU OESGRIPTOR FXAIUPPER 6 BITS! 
WITH LDC CODE" " 



"SET PRU OESCRIPTOR-FWACLOffER-12 "BUST 



-DATA AREA FH A 




INITIALIZE NO/.— OF"CH WOROS" 



RE AD PRU DESCRIPTOR 

BUMP DESCRIPTOR AOORESS 



UPDATE WORO COUNT 



PRU LENGTH / 100 IS rF"SHORTPRU 



•*.O.T0 



DECREMENT PRU COUNT 

PROCESS NEXT PRU OESCRIPTOR. 
ENO OF BUFFER OR SHORT PRU 



FEAT75A 

TEAT75A" 

FEAT75A 

"FEAT75A" 
FEAT75A 
FEAT75A" 
FEAT75A 
FEAT75A 
FEAI75A 
FEAT75A 
FEAT75A 

"FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAI75A 
FEAT75A 
FEAT75A" 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A- 
FEAT75A 

"FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 

"FEAT75A 
FEAT75A 

"FEAT75A" 
FEAT75A 
FEAT75A 
FEAI75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A- 
FEAT75A 

i F£AT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT 75 A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 

■ FEAT75A 
FEAT75A 
FEAT75A 
FEAT75A 



121 

I2T 
125 

"126" 
127 
12 8" 
129 
130 
131 
132 
133 
134" 
135 
136 
137 
138 
139 
140" 
141 
142' 
143 
144 
145 
146" 
14 7 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 
163 
164" 
165 
166 
167 
168" 
169 
170" 
171 
172 
173 
174 
175 
176" 
177 
178 
179 



r - 
n 

Ln 

LU 

I 

J) 

In 
LU 



-4 



* ht 



I 

tn 





s r c 




R.OI/L 


c 


" *. 76 " 


L 


<i?7 


L 


sao " 


L 


501 


-.._ c - 


502" 


L 
L 


503 
50<T 


L 


505 



""- PERIPHERAL- PROCESSOR RES 
_LOAO pp OVERLAY 
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"1-23200- 
160 



48/46 t 

"■ 1.8/52 I 

48/55 

1,9/16 "" 

49/31 I 
-1.9/51 1 

49/12 
"49/05 " 

50/24 
-'50/15" 

49/26 I 
"50/22 

50/18 
"46/22 

46/23 
"44/36 

36/05 
—34/39 

34/37 
"34/50 



40/57 "" 
49/14 t 
49/25 L 
49/38, 

"50/01 
50/13 

"49712 
50/ 26 
50/29 
50/11 

■"587231" 
50/24 i 
46/25 t" 
46/30 L 

"46/22 «- " 



t 
L 

i 
L 



50/27 



~34745"""~ 
34/52 
34/54 t 



36/05 
"36/05 

36/05 
"36/05 IT" 

44/42 S 



"36/05" 
36/05 
— 36705 
44/55 



"39/52 
46/48 L 




0" 



D 

S 

S" 

S 

D" 

S 

S 





"T6 " "PPTEXT" 

66 PPTEXT 
-74- PPTEXr 



C.PPMES1 



"75" 



"PPTEXT" 



"DTPPSTAT" 
O.RA 

"c;tmo 



"77" 

55 

"2 DT 



-PPTEXT"" 
PPTEXT 
PPTEXT 




<J 



36/05 
36/05 
36/05 
45/06 
45/11 
45/08 
48/28 
43/55 
44/01 
36/05 
13/45 

15/35 

13/27 

13738 

26707 

26/29 

13/31 

15/37 
"44/46 

44/55 

48/28 ■ — 

48/29 

15/34 

15/36 

15/49 S 

15/50 

16/04 S 

16/05 

19/32 s 

19/35 

"20/34" 

20/46 S 



S 
S 



46/44 L 

■45714 "S" - 

45/12 
"48/34 S 

44/06 S 
"44/12 S 

■15/44 "" 

18/17 

19/33 

20/39 
"30/47 "- 

31/42 
"13/34" ~ 

18/18 
"45/04 S" 

45/06 ' 



"20/48" 
21/01 S 

"21/02 "" 
23/37 S 
23/43 ■■"' 
24/29 S 

"24/30"" 
24/34 S 

-24/ JS " 
26/45 S 



"45/16 S"" 

45/15 
49/18 """"" 
44/17 S 
44/20 S 

"15/4 7 
18/25 
20/43 
20/56 
31/54 ~ 
32/19 
16/10" 



"45/18 S" 
45/17 

44/25 S 
44/35 "S 

"16/02 " 

23/3 9 
37/50 S 

"33/34 
34/35 

" 17/17 " 



"45/20 46/56"t' 

46/46 L 



45/09 
46/50 L" 



"16/08" 



16/11 W 18 



33/27" 



"45/08 
45/20 



"26/54 
26/5 7 
27/22 
27/29 
27/44 
27/49 

"27/5 7 
28/04 

"28/06 
30/32 



45/22 S 
45/28 



30/42 
31/40 
31/43 
33/25 
33/29 
33/31 
33/35 
34/32 
34/39 
34/42 



39/15 S "'"' 

45/44 

37/52 S 

39/17 S 

37/54 S 39/18S 

48/27 



37/47 S 
37/48 
37/56 S 
37/57 
38/53 S 
39/03 
39/05 S 
39/28 S 
39/32 
39/38 S 



39/44 
39/46 
40/01 
40/02 
40/03 
40/04 
"40/05 
43/19 
44/13 
44/21 



"44/23 

44/24 
"45/34 

46/48 
"45/48 

45/4 8 
"45/48 

45/48 
-48/32 

48/45 



— 48/46 " 
49/14 
49/17 
49/20 
49/22 
49/28 

"49/47" 
50/09 




w . M iu i nnmn'»i!»."'ui" 1 . ' ."""W. 1 



~x 



STL --- SraST SYSTEM. EXECUTION 
SYMBOLIC REFERENCE TABLE. 



n 



.OHPASS 3.75077. 



09/10/75 09.59. ^9^ 



^>AGE" 



"54~ 



O.T1 



0.12 



0.T3 



11 



12 



PPTEXT 



PPTEXT 



13 



O.I". 



m 



PPTEXT 



PPTEXI 



b;t5~ 

0.T6 

"tr.Tr 
o.zo 

0.21 



"IT 

16 
_ ir - 


"I' 



"PPTEXT" 
PPTEXT 

"PPTEXT" 
PPTEXT 
PPTEXT" 



I 

a 



I 

! a 

i 



ft 



0.Z2 2 

0.23 "~ 3" 

0.2i. i, 

'8.25 5" 

0.26 6 

0.Z7 7 
ECauFFER-135008" 



PPTEXT 

"PPTEXT 

PPTEXT 

-pp"TExr~ 

PPTEXT 



PPTEXT 



ECOVL 
ECQVLA"""" 

Ecovi.a 

ECSLIB """ 

ELI4K 
"EJITR5TKW 

ERR3DP 
"ERRTODP — 

ERRNOEC 
"ESEGr 

ESTFWA 



"EX. PL IB 

EX.SPM 

FCCH to 00 00 



422 

— ?3i- 

427 

1311 

"673 

2 

4 

2 

Z 
3 



'PPTFXf 
PPTEXT 



FLECS 

"FVALUE — 
F.AUTOLD 
F.3R-J3'"' 
HOLDFHA 

"IDL1 
I0L2 

"tLCCLAY ~ 
INCR3YT 
INCRiST 
INCR222 

TPVDDP 

IP.ECSB 

ip.Etia- 

IP.SBPH 



1000 

?- 

414 

.... ftlr 

110515 
m - 

120 

— - 175 

2056 
_ 175 4 

2024 

- 0~" 

1 



22/1.2 S 

33/33 S 

24/23 S 
" 24/24 

23/<a 

"26/06" S" 

26/09 
" 30/46 S 

22/'.'. S 
"23/38 

2 3/*. 2 S 

26/20 " 

13/28 S 
"13/29 

48/38 S 
"26/31 S 

26/32 

"27M6"S" 

37/1.2 S 
"37/1.3 " 

27/33 
"27/35 "" 

27/37 
"27/1.1 

26/27 

27/51. S 

27/31 

36/05 0" 

26/1.3 L 
"26/1.3 

26/5<i 

11/10 

1.3/37 

33/26 

26/39 
" 26/1.0 

26/i.l 
"28/16 " 

1.8/22 

3S/09 

33/39 
"36/05 "D" 

36/05 
"36/05 " 

36/05 
"36/05 0"" 

36/05 
"13/34"L" 

13/30 

11/05 0"" 

1.9/56 

1.8/1.7 

49/40 L 

11/11" — 

11/06 F 

11/10 — 

11/12 



33/37 

34/34 S 

24/28 I 

34/36 S 

30/1.9 
" 31/56 "S 

31/57 
"32/09 S 

26/10 

26/18 

33/40 S 

48/24 

13/32 
"13/40 

42/li~"S 
42/12 
"42/47 
43/17 S 
43/22S" 
48/22 
27/^8 



35/0 8 S 
35/13 
34/46 
34/48 S 
32/12 
32/16 
32/18 S 
32/21 
35/10 S 
38/13 S 
39/01 S 

13/39 S 
26/21 



43/25 
43/29 
43/33 
43/40 
43/45 
48/36 
27/50 



35/14 S 38/19 
38/18 S" 38/24 S 
28/07 S 35/01 S 

26/54 S 27/20 L 
"26/S6"L— T27/20-" 

27/09 
"27/14 F "— 29/41"F 

43/39 L 
"33/35 I " " " 

"27/01 28/11" 

26/46 

Z8/17"T 

48/44 49/02 S 



38/54 
42/29 
35/06 
36/55 
32/30 
34/37 
34/44 
34/47 
39/06 
39/30 
39/40 

35/07 
35/05 

43/47 
44/04 
"44/05 
44/15 
44/16 



27/52 S" 



38/25 

40/19 



27/29 S 
27/31 X 



42/49 
43/35 
42/32 
42/51 
34/51 
35/02 
38/09 
38/11 
39/47 
43/20 
43/54 



43/42 
44/27 
4^/26 
43/30 
38/39 
38/43 
38/56 
39/42 
44/36 
44/56 
48/33 



44/29 S 
44/30 
44/02 
44/07 
43/23 
43/56 ~ 
46/07 S 
46/10 S" 



44/09 
44/10 
46/16 



48/25 

38/14 38/29 

44/39 S 44/49 

44/40 44/51 

44/42 44/53 

44/43 S 45/24 

44/48 S 45/25 



38/31 

45/27 

46/01 
"46/02 
46/05 
46/11" 



"48/26" 



46/14 



28/0 2 



46/04 S 
46/09 S 



44/52 



46/13 



48/23 



42/19 F 42/25 F 42/30 F"42/5HF 



49/04 



36/05 
13/41 
13/43 L 

50/06 L 
"48/49 — 
49/49 



48/53 
50/08 



49/02 L 



49/40 



43/34 f 44/26 f 47/24 F 






ja 

I 

Cfa 
t- 1 



O 



o 



J 



J 



~j 



SYMBOLIC REFERENCE TABLE. " B, *°" 



iCOHPASS" 3.-76077. 



IRAQR 

~TRFCA<r- 

ISSUE 

~tssuer«- 

LBLAQR 
~ E BE ADR 2" 

LBLSIZE 
~ LBUF" — 

LE.MAIL 
"LINE'S 

LNTTABLE 
~LSEG0 

LSEGl 

LSEG2 

LVALUE 

LHAE3T ~ 

LiPPQVL 

~e:;cpnu«-- 

L.PPHOR 

HAXR3CHT- 

MAXPuLTH 



65030 
"55810" 
750 

V36" 

53701 



6 
"30 - 
127600 



pptext 



HERRCNT 
HNETAB 

Hs»so 

MTRdJF 

MTROSOC" 

MTROSOL1 

"MTR03aL2~ 

MTXLSTl 

" "MTJaST?" 
MTXLSI3 
MTXLST4-- 
MTXLST^Q 
HTXLST3— 
M.AftORI 

H.DFM 

M.ICfc 

M.KrLL 

M,MrSCPU 

~" M.RC4 

NO COP 
TVOMXU 

noiipr 

NXTCHAN" 
OPCXCTLH 

OVLS 

OVL3 




""FPTETr 
PPTEXJ 



121200 
"1213" 
1215 
1222 
1626 
I6"30~ 
163i* 
16VI 



bvcc — - 

OVLO 

"OVLE 

PNTPRU 
PPG3JF — 
PPOtfL 

"VPOVtX 

PP0SUA3R 
PP1BIA3- 
PP28IAS 



77- 

12 
12— 

507 
ID70 — 
1506 
2032 — 
117000 
~ 737" 
366 
VOS 
'til 

1,13 — 

61.676 

revs — 

1223 

i2zr — 

107000 

- 3 — 

10 



PPTEXT 
"PPTEXr 

PPTEXT 
"PPTEXT" 

PPTEXT 



"09/10/75 "or.S9.29i 



PAGE 



55 



36/05 

36/05 0~ 

27/10 
"26/1.7 

36/05 
~36705~O'- 

36/05 
"36/05 ar~ 

45/21 
"36/05 ~ 

36/05 

26/1.1. 
"26/56 — 

36/05 

V8/23 0™ 

35/1,2 
""13/1,3 

U/21 

36/05 

36/85 

36/05 

i.d/52 



36/05_ 

28/09 

27/02" 

36/05 



35/08 L 
"27/iQ"C" 



■ r- 









36/05 

36/05" 

1.6/51. 



V27T6 

28/15 
27/21 



V9/03" 



~V2/28 

20/16 
29/38 Q— 



35/1,2 
35/V2 



i»2/31 
42/31 



35/37 
36/05 
36/05 



39/37 



39/39 



39/V3 



50/32 
'36/05-0 "36/05 
36/05 




36/05 
39/57- 
39/56 S 
"1.0/21 XT 
1.7/06 L 

-v7/09"tr 

V7/1V L 
"VV/2C"— 

V7/17 L 
"V7/25-C- 



39/50" 

39/53 

39/57 

I.3/5V 
V3/56 
M./05 
W/lfr" 
V1./10 
1. fi/30" 
26/13 

3V/5ii " 

33/1,1 35/11 

"23/31 

20/35 

22/1.3 

27/27 
" 38/15 - 

V5/01 
"1.9/36 " 
36/05 
25/57— 
26/04 L 
"26/05 — 
26/22 35/04 



39/1.3 
"40/07 — 
1.0/18 L 



40/18 
"V0/I6~LT 



—ifrnx c- 



28/11 L 
""38/1.6 0- 

45/30 L 

49/V5 L~ 

36/05 
"35/01 L- 

35/17 
-26/17-L- 



26/17 

36/05 
"45/48 " 

38/03 
"41/10 I 

36/05 
"36/05-0 

36/05 



"26/25 t- 

"45/48 ~~ 
41/11 

"41/36 

36/05 

""36/05 

36/05 



-ns/iitr 



"45/48 



'1t5/ii8 



arm v 



Z] 



e 









s r I -— " Sr«RT-S»SfCM EXECUTIOH 

SYMBOLIC REFERENCE TABLE. 



COMPASS 3.75077. 



"09/107?S~"«9 .59". 2«; 



~PA«£ 56T 



I 

ai 



f ! 



PP3BIAS 
'" PRULEW1 
PRULIM 
P.CST 
P.0F3 

~'p,osr~ 
p. est 

* p.Lia — 

P. HAIL 
P.NCP " 

P.HPP 

- P. PC OH""" 

P.PPOVL 
' P.RQS 

P. ZERO 

RAFLX ~— 

RAFL1 
"RAFL2 " 

RAFL3 

RBOUF -- 

RBLI.1 

RCOK 

RCOMA 
" RECOVERY 

RMsauFa 

RMSOUFl^ 

RMSERRA 

RMS ERR 3""" 

KHSCKRC 
""RMjERR'IT - 

KHSERRE 
"RHSERRG"" 

RMSERRJ 
""RMSeRRiC" 

RMSERRL 
"RMSERRM" - 

RMSEnRN 
"RMSERRO — 

RMSEP.RP 

RHSEftRQ — 

RHSPRU 
~R0CKCNT~" 

RVALUE 

RWOELAY" 

RHPD 

3HPI0 

RWPIOA 
"'•RMPIOT 

RWPIOH 

RWPL 

RWPP 

RWPSTBL "" 

RUPWF 
"R.DCH ~ 

R.OCHX 

R.CFM 

R.OFMX 



20 
101 
2 
~"T~ 

3 
'"""«"" 

" 1 

65 
... . r 

3 



77 

" IT" 

133 

1*5 



"PPTEXT 
PPT£XT_ 

PPTEXI 
"PPTEXT 

PPTEXT 
"PPTEXT" 

ppiext 

"PPTEXT" 

ppitxr 

PPTEXT" 
PPTEXf 



154"" 
157 
52701' 
1 
- 555- 

5*7 

144 - 

54700 

117500" 

31 

32 

33 

"" J4~~ 

35 

"37 ~ 

<.0 
__ ltV - 

42 
""' HT~ 
itt 
-ii"S~ 

46 



30" 
100 
10" 
1 
T44"" 
611 
"63*" 
6*0 
" 637" 
635 
"iH" 
£0* 
651 

OH 5 

326" 
325 

"705 
70«. 



"PPTeXT" 
PPTEXT" 



36/05 
36/05 
36/05 
37/55 

H^/i.7 

48/21 
48/35 
43/16 
45/23 

"45/55 
37/41 
37/46 
42/10 

"48/21 
3 3/32 

"15/3h 
15/47 

"15/55 
15/h5 

"36/05 
36/05 
30/34 
30/36 L 

"44/57"" 
36/05 
36/05 D 
36/05 
36/05 
36/05 

"36/05 
36/05 

"36/05 
36/05 
36/05 
36/05 

"36/05 
36/05 
36/05 
36/05 
36/05 
36/05 

"36/05 
36/05 
11/04 
31/48 
32/02 
31/i.l S 
30/50 
32/13 L 
31/54 L 
31/47 L 
32/07 
32/10 
22/48 
23/34 L 

34/32 

34/31 L 



36/05 
36/05' 



45/55 F 
"48/31" 

43/<.6 



45/57 



"15/51" 

16/12 
"16/06 

16/02 L 



"30/4S X 
30/51 

"45/0 3 "C" 
36/05 
36/0 5 " 



36/05 



15/55 

31/50 I 
32/12 -f 
32/15 L 
31/39 S 
32/31 
32/06 
32/05 
32/30 L 
32/19 L 
23/35 0" 
23/-«<t 

34/56 



"21/10 



32/17 S 
32/22 



"31/50" 



35/03 S 
"32/32 35/16" 5 



35719 



■>•:*« 



.: ^^ WW iiF' WWti 



ft 

« 

I 

i 



Cta 



J 

* 

1 

1 
\ 
i 
t 
t 



TTT — =~ - 5IT!fr^YStfM _ ExeC~UTl0lf" 
SYMBOLIC REFERENCE TABLE. 



COHPASS lS7t$677.~ 



097ia/r5~B9^?9.29r 



~PA6f 



57" 




26/35 

ir/jfr^- 

33/24 L 

12/aai- 

13/27 L 
H9/290" 
19/28 L 
14/22 
14/21 
25/55 
15/41 
19/39 
15/mO 
22/39 
22/<.l 



SH/ 25"TJ 

33/43 

- 1 5/4K T670 9TS"" 

. 26/15 39/09 

19/30 22/*? — 

19/39 

25/56TJ 



"iT/ifTS — 21/ or 



"23/32" 



"26"/ 1 V 



31/47" 
™33?re~ 



"3C/5S 



"35712" 



26/12" 
31/1.9 



26/23 



"26/2 ft" 



SODA 

SDBOATA" 

SDBLOO 
SDBtOOP" 

SEC 

5ECX 

SETTYPt 
'"" " STARTCP 

ST30 

STB I 

STEP 
STC 

STLQUF 
~ * STLOO 

SIL002 
" "STCOB!;-"- 

stu 

STL2 

STL3 
— STL 4 

STL5 

STL 6 

STORIT 
~ STQR2 

S. ACTION 
"■ S.CMU ■ — 

S.£CiLVt 



-3" 

505 

472"" 

".75 
MS" " 
1226 
"1225~" 
it 12 
""110465 " 
343 
351— 
2037 
' 100D~ 

117500 
— "1073" 
1057 
1055" 
11Q2 
11B6- 

113* 
— ~ tlltZ — 

1160 
""" 1203— 

2026 
~2052— 
12 
3" - 



PPTEXT 

"PPTEXT 

PPTEXT 



2(1/17 F 
30/31 L 
"30/45 """ 
31/1.5 
31/37 I 
24/34 
24/26 
13/1.6 
17/14 L" 
18/22 
18/21 t 
19/37 
20/32 L 
30/1,2 
11/12" tr 
28/03 
"27/1.0 
27/32 
27/34 
38/05 
42/09 
44/1.0 
36/05 
24/23 
24/29 L 
1.9/1.9 L 
"37/41 t 
36/05 
38/44 " 
38/21 
38/27 
38/57 
"39/01. 
37/1.5 
39/29 
39/1.5 
40/02 
1.9/33 
".9/ 53 
1.3/21 
1.3/1.1. 
1.3/39 



15/41 

22/42 0~ 
22/1.6 
"29/1.6 
30/37 

3i/3«nr" 

32/03 
32/0 8 



21/08 



30/32 

""35/1 o rsr 



15/5 3 
"17/19 

18/30 
20/33 
21/03 



17/15 



L 

s 

L 

L 
L 



28/09 

"27/42" 

28/01 

"27/36 

42/10 

"1.2/14 

44/44 

36/05 

24/31 

24/37 

50/10 



t 28/12 

S 27/53 Z775ert 



S "27/45~C 27747 S "~~27/55 


"42/52 






36/05 
" 38/49 
38/31 
38/33 
39/19 
"39/07 
39/21 



39/48 
40/06 "" 
49/42 L 
"50/03 t- 



"38/41 TJ" 
39/22 



:i 






9 



-*„ 



M » M » . 'irT U ff »» !M llMW^* re^fcW)Mfr* i«»,tf l,t„**in;>*,<* 






r'j~U"sTC a?**.' i.-tt;'-«'. nn^niKww^M': 



.._ f -j. ___ -^jfni s«StEH EXECUTION 
SYMBOLIC REFERENCE TABLE. 



COMPASS 3.750 77. """ €9/16/75 09i5"9rz"9- 



>A6E" 58" 



I -» 



! ft 





ft 




" 




ft 


i. 


ft 


JJ 1 

1 1 

th 1 


>9 


1 


® 




ft 



S.LBLLVL 
S.PFLVL" 

S.SEGO 

S.SE.G1 

S.SYSLVL 

TA3IN0X "" 

TASLESAV 

TAPfcPPP" 

TAPEPRU 

TBUFO 

TBUF1 

1£A p-- 



i o _, 



i o 



♦, "5 



J "5 



I! 

3 « 
I 

■I « 

ii 

|l » 

I! ^> 




43/32 

43/28" : ~ 

26/37 «f2/u9 

27/17 D~ "27/28 42/51 

1.3/21. 

48/25 G V8/«f0'"'sr" 1.8/52" ~ 48/56 ~S"' 1.9/87" 5" 

36/05 36/05 

36/05 ' "' "" " " "" " 

36/85 36/05 

36/05 36/05 ■'"" : " """" 

36/65 O 36/05 

48/26 48/51 S 49V30 TS" 49/42 * 49/55 " 

1.8/1.1 S i»8/S<. <t9/35 i.9/50 S 50/83 

18/16 L"~ 18/27 " *- — "■" -— 

18/23 18/29 L 

'i»«t/37 S "' i»i*/4t o "" '"""'" 

i.E/07 

'36/05 "" ~~~ '~ ~~ "■"■" 
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STUDY QUESTIONS 

PPBES 

1. Explain in general the functions of PPRES. 

2. Which direct cells are forefixed at deadstart time? 

3. What does it mean if a PP is idle, and what is it then really doing? 

4. How does a PP make monitor requests, and how does a PP know its request is 
handled ? 

5. Which PPRES-routine decides whether a monitor request is for CPMTR or for PPMTR, 
how does he decide it, and explain what he will do then in either case. 

6., How does a PP routine know whether an issued MXN or MAN instruction took effect? 

7. A PP needs access to a control point field length. Explain what he has to do. 

8. Why is it necessary to terminate access to the control point field length as soon and as 
often as possible ? 

9. How does a PP program end ? 

10. What happens if a PP places M.KILL in its PPOR, and how can we make this PP again 
available for the system? 
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STUDY QUESTIONS 






1. Explain in general the functions of PPHES. a 0}ro<*/> 3T c4T'i t ~A e 4J-t+He#, i ***r 

2. Which direct cells are forefixed at deadstart time? A fPMizrSS *v_ 

3. What dees it mean if a PP is idle, and what is it then really doinz? /tzefr-s+r* sr- /r'rS 



i, and what is it then really doing? /potctj*,*, &T- tr 

auests, and how does p. PP know its request is 



•i. How does a PP make monitor requests, and how does a PP know its request 
handled? p/dc*?**, *f-l?*~~m /'.«, St4* OH+Tf+tjf' /*€tt/x7w* 

5. Which PPRES-routine decides whether a monitor request is for CPiCTR or for- PP3/3T&, 
how does he decide it, and explain what he will do then in either cass, 

S- How does a PP routine know whether an issued MXSf or- MAN" instruction took effect? 

7. A PP needs accessjo a control point field length. ETolaia what he has to do. /^5*tf*<s7^" 

8. Why is it necessary to terminate access to the control point field length as soon and as 
often as possible? ' £&&.&** s *£-■ &~r ^rT^-y^A «e_ J7t*\/&£ 

9 . How does a PP program end ? A?f » D PP 

10. What happens if a PP places M.KELL in its PPOH, and how can we make this 'WP again 
available for the system? S-/of* -$<*>s7*-*~, — Tfev?^* ,"*, 
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flONITOR FUNCTIONS 

Lesson Guide 

REFERENCES: 

PP COMPASS Student Guide Section X 
System Programmers Reference 

TRAINING AIDS: 

Visuals VALS-S3-1Q-3 thru VALS-S3-1H-5-I VALS-S3-10-17 

ASSIGNMENTS: 

Study fluest ions Section X 

OBJECTIVES: 

-CI* To define the SCOPE 3«H System rionitor-Cs> 

-C2J To define methods for users to make requests of 
riTR or CPflTR 

«C3> To discuss specific NTR and CPflTR functions 

<H> To discuss flTR and CPflTR request processing techniques 
■Cdetails> 
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tlONITOR FUNCTIONS 
Lesson Outline 

MONITOR FUNCTIONS 
A* Definition 

o CPMTR - Central Processor Monitor 
o MTR - Peripheral Processor Monitor 

B. General Purposes of CRMTR 
o Process pool PP requests 
o Process RA+1 requests 
o Schedule CPU-Cs> 

C- General Purpose of MTR 

o Control all system activities 

o Handles system-user communication 

D- MTR - CPMTR Communication 
o Uses CMR Tables 
o Both do something - not look for something to do 

E- Detailed Monitor Functions 
o CPMTR 
o MTR 

F« Monitor Request Processing 
o PP to MTR 
o PP to CPMTR 
o User to MTR 
o User to CPMTR 
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VALS-S3-10-3 

MONITOR 

SCOPE 3»4 is controlled by a monitor which is divided into 
two parts* 

CPflTR - Central Processor Monitor 

MTR - Peripheral Processor Monitor 

The names of the two monitors are related to the residence of 
the code and do not indicate what they control* 

CPMTR monitor-! as the name impliesi executes in the CP- It 
is responsible for three main functions: 

1- Process certain pool PP output register requests- 

2» Process user RA+1 requests- 

3- Schedules CPLKs* 

MTR-i residing in PP0-» is in general control of the SCOPE system- 
It runs continuously during system execution with this main 
functions: 

1- Control and coordinate all system activities* 
5- Maintain system clocks- 

3- Assign system resources- 

4- Handles system-user communications- 
Users may make requests of either of these monitors in several 
ways- These will be discussed later in this section. A list 
of specific monitor functions follows* 
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TWO MONITORS 



PP -CsJ 
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System I/O 
Table 
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MONITOR FUNCTI NS 



01 


M-SEIST 


Q5 


fl-CLRST 


03 


H.RCP 


04 


M-DCP 


DS 


M-RCLCP 


Ok 


M.ICE 




oo ex-cmsm 




01 EX-ECSM 




02 EX-ECOVL 




03 EX-SPM 




OS EX-SCH 




Ok EX-SCHI 




07 EX-REi2EB 




10 EX-RELEB 




11 EX.REflSB 




12 EX-RELS8 




13 EX.MVIN 




1M EXoHVOUT 




IS EX-FLHB 




Ik EX-CSUAP 




17 EX«AUTEB 




20 EX-ECD 




21 EX-ECR 




22 EX»ECtil 




23 EX-CEfl 




24 EX.DDPER 




2S EX-ECLDV 


07 


M.CPUST 


10 


n. SLICE 


12 


il-RCH 


13 


m-dfm 


IS 


M.STEP 


lb 


M.RBTSTO 


17 


M.RSTOR 


BO 


. rWTSR 


21 


. m-dpp 


22 


PUABORT 


as 


n.SEfl 


5k 


n.SEF 


97 


n.isp 


30 


M-SPRCL 


31 


n-ccPA 


32 


h-rpj 


33 


M-EES 


34 


fl.CPJ 


3S 


n-scH 


3k 


M-PASS 


37 


M»RACT 


m 


m.ntime 


42 


M-NOTE 


43 


n.ppcH 


MM 


H.BUFPTR 


MS 


11. PATCH 


4k 


1% TRACE 


47 


fl.SLPER - 


77 


fl.KILL in _ 
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Set CPU status bits 
Clear CPU status bits 
Request central processor 
Drop central processor 
Recall central processor 
Initiate central executive 

CM storage move 

ECS storage move 

ECS overlay load 

Call stack processor manager 

Call scheduler 

Call scheduler 

Request ECS buffer 

Release ECS buffer 

Request system buffer 

Release system buffer 

nove data to ECS from system buffer 

Hove data from ECS to system buffer 

Flush buffer 

Clean ECS after ECS RPE in swap file 

Terminate automatic allocation 

Display ECS 

Release display 

Modify ECS 

Clear CEM-working flag 

Process DDP overlay loading error 

Make successive partial reads of 

ECS record 
Change CPU status -CIP-MCPU - 1> 
MTR interrupts CPMTR at end of time slice 
for job 

Reverse channel 
Dayfile message 
Enter step mode 
Request RBT storage 
Request storage 

Terminate storage request -CIP.RTI1TR = 0> 
Drop PP 

Abort control point and drop PP 
Assign job sequence number 
Set error flag 
Initiate stack processor 
Stack processor recall 
Change control point assignment 
Request peripheral job 
Enter event stack 
Capture peripheral job 
Initiate integrated scheduler 
MTR ignores it-to be cleared by another 
routine 

Request control point activity 
Enter new time limit 

Null function-cleared immediately by PPMTR 
Request channel surveillance 
8uffer pointer address 
Enter a patch into MTR 
Turn on MTR trace 
Xd other CPU 
Issues bad monitor request 



Detailed CPflTR Functions 

Cil-CLRSXI- Clear Status 
-C 0QQ2 -. 88BB-.« h**-,**** -,pQNN> 

Where: '■' 

BBSS - pattern of bits to be cleared. 

NN = control point number {only if HTR output register} 

Called to clear CPU status bits in control point areas- Will cause 
linkage or d-e linkage from chain of control points actively waiting 
for CPU- 

dT-CPUSTj- Change CPU Status 

{ DQO? 1***"*X iNMMM yMMNM -,»« *!**•« J" 

Option i X = Q. 

If either CPU is aff-i it is returned to the' on status. 
This does not affect a CPU that was locked off at 
deadstart load time. 

Option 2 X = 1 or 2. 

CPU X is turned off- If any control point was dedicated 

to this CPU- it will not execute during the period the 

CPU is offi job returns to CPU when CPU is turned on 
aga i n . 
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N'N • - Control point number -CHTR only>. 

Execution of the central processor job at the control point is stopped 
The control point status bit C-, D-, U-, X-, and Y are cleared. The 
control point is removed from the active control point ring. 

The control point status bits prior to M.DCP are returned to byte 1 
01 the output register of the requesting PPU. 

CjliI C E --. Initiate Centrol Execution 

-CQOUb-.PPPPnPP?P-P?pp,iiii> " 

The parameter IIII identifies a central memory program which will be 
started by CP.1TR upon recognition of this request. Some of these 
programs run in user mode and some in monitor mode. Only one user 
moae program may be initiated at any time. A user mode program 
though, may be interrupted by the execution of a monitor mode 
function. 

All programs initiated by an M.ICE operate with RA=Q and a large 
enough flela length to allow access to the entire central memory 
ana ECS. 

The parameters passed in the center three bytes are interpreted 
difrerently by each of the central executive programs. 

* CM storage move 

* 1 ECS storage move 

2 Load ECS resident overlay 

3 Stack Processor manager 

4 Unused 

* S Scheduler 

** h Scheduler {Storage Request Entry > 

7 Request ECS buffer 

10 Release ECS buffer 

11 Request system buffer 

12 Release system buffer 

13 RflS-ECS move 
m ECS-RfIS move 

IS Flush ECS buffer 

Ik. Clean ECS after ECS RPE in swap file 

17 " Terminate automatic allocation 

20 Display ECS 

21 Release display 

22 ftodify ECS 

23 Clear CEil working flag 

24 ECS transfer thr-ough DDP failure, try RMS 

25 Enable successful partial reads of ECS records 



* Executes in User ft ode 
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(Jl.RCH '- Request Channel Cj * */' 

~Ta0i2 -i 88A A -, DDCC ■> <*«"«« t RRRR} 

AA = first choice channel number 
BB - second choice channel number 
CC * third choice channel number 
DD = fourth choice channel number 

RRRR = 0000 Request immediate reply 

RRRR ?* QQOQ No reply until a requested channel has been reserved - 

When channel zero is requested-, it must be field AA • When 8B-. CC-. 
or DD is zero it is assumed that this is not a channel request and 
that there are no alternate choices beyond it- 

If none of the requested channels are available and an immediate 
reply is requested ■> fITR will Set bytes Q and 4 of the PPU output 
register to zero. 

When a channel is granted-, the number of that channel will be reutrned 
in the PPU output register byte 'i. -C location of A-AJ. Byte H will be 
set to a non-zero value- 

On exit-i if a channel has been reserved-, the output register will 
look like: 0000 XXXX ««<*« **«« YYYY 

Where: 

XXXX = channel number 

YYYY = PP input register address 

If the CE.J/f1£J feature is not in use-, this function is performed by 
flTR. 

.RCLC.p1- Recal 1 . Central Processor 
-CU0QS-.FFFF T w mm *-,«** ww iQQNN> 

Where: 

FFFF = Control point address of CPU if pre-emption is to take 
place-, or address plus J, to flag I/O in process- 

NN = Control point number -CflTR only}. 

This request has two forms: 

1. If bit zero of FFFF is not set this function is used- to remove 

a control point from recall status. The X and Y status bits are 
cleared. If the resulting stjtus permits-, the control point 
is linked into the ring of jobs waiting for the CPU. If FFFF 
contains the control point address-, the CPU is assigned to the 
job immediately- 
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2. If bit zero of FfrF is sati this is a function issued by flTf? 

when the value of a buffer pointer has changed while the job 

is in the active CPU ring but is not currently runnina. The 
effect is to schedule the job immediately. 



I..RCP)- Request Central Processor 
10003 -I*"** •,*»«#«*« ^nmm -tOQNN} 

Where s 

NN = control point number -crtTR only} 

This request is synonymous with an fl.SETST to set the bl status •> 
except that the pre-emption flag is set. 

IjjsnJTJ- Set Status 
ttfUuIi«S88n*»«w ****** ^QGNN} 

Where: 

8B9B = pattern of bits to be set 

NN' = control point number Conly if riTR output register} 

Called to set CPU status in control point area- Will cause Unkind 
or delinking when appropriate. 

N SLICE}- Terminate Slice Period 

Only HTR can issue this function. It is issued to interrupt an 
^executing user mode program so that CPMTR can reschedule. 
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Mi 


M 


13 


M 


IS 


M 


lb 


M 


1? 


MM 


SO 


M 


SI 


M 


52 


M 


as 


M 


2b 


M 


2? 


M 


3D 


M 


31 


M 


32 


MM 


33 


**** 


34 


MM 


3S 


MM 


3b 


M 


37 


M 


m 


MM 


42 


MM 


43 


MM 


44 


MM 


45 


MM 


4b 


MM 


47 


MM 
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PP Monitor Functions 
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n.DFn 

rt-STEP 

n.RBTSTO 

N.RSTOR 

fl-TSR 

tl.DPP 

fl. ABORT 

M.SEF 

M.ISP' 

M-SPRCL 

n.ccPA 

fl.RPJ 
fl.EES 

n.CPJ 
m.sch 
n.PASS 

(1.RACT 

fl-NTIflE 

fl.NOTE 

fl.PPCH 
fl.BUFPTR 
fl. PATCH 
M. TRACE 
(1.SLPER 
H.KILL 



Issue dayfile message t 

Enter STEP mode 

Request RBT storage 

Request storage ' l 

Terminate storage request * 

Drop PP 

Abort control point and drop PP < 

Assign job sequence number j 

Set error flag 

Initiate Stack Processor , 

Stack Processor Recall 

Change control point assignment 

Request peripheral job 

Enter event stack 

Capture peripheral job i 

Initiate Integrated Scheduler 

To be cleared by another routine 

Request control point activity 

Enter new time limit 

Null function! cleared immediately [ 

Used as break point- 

Request channel survei lance by PR J 

Buffer pointer address 

Enter a patch into P1TR 

Turn on fTTR TRACE 

XJ to other CPU 

Bad flONlTOR request made 



*• New function code for SCOPE 3.4 
mm New function for SCOPE 3.4 

Function 23 -C H - R££P> and 24 -Cn.1>EflP> have been deleted because they 
were used so infrequently that their space {approximately Ida bytes 
in f1TR> could not be justified- Any routines using these functions 
should be modified accordingly- This implies requesting CH.EST and 
searching the EST or the equipment needed- When the equipment is 
found-i a check must be made for a control point number in the entry. 
If a control point number is present-, the equipment is reserved^ 
therefore drop the channel and try again later- If there is no 
control point number! the equipment is frQ^ and may be reserved by 
writing the requesting progranr's control point into the EST entry- 

A complete description of the contents of the output register and 
function parameters for each of the above requests follows- Those 
bits or bytes irrelevant to the function are denoted by asterics 
■£*>. Functions ■ are in alphabetical order- 



) 
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PI. ABORT -Abort Control Point and Drop PP 

■CQQ5? "> >*>*>*** -jXHMM t m'mmW -i MMX»} *~ 









The job associated with the requesting PP is terminated- The 
requesting processor is responsible for an explanation message in 
the dayfile. The operation of this function is identical with 
function PI. DPP except that the error flag in the control point area 
is set to F.ERPP -C3> to note the abort function. 

P1.BUFPTR - Address of Buffer Pointer Word 
■COQtm -,»«»«*•»• -.mwmh-iOQAA tAAAA> 

AAAAAA - Buffer Pointer Address 

The address is absolute; the I/O driver has set the field access flag. 
The function is not cleared by P1TR but by the I/O driver itself. 
When the low order 15 bits of the buffer pointer changes -. HTR restarts 
the associated control point. 

PlvCCPA- ,.- Change Control Point Assignment 

-C 031-1 MW»»*«-i MUM* TUMWHiMaijSJN} 

The requesting PPU is released from its current control point assign- 
ment in the same manner as if it had issued an ft. DPP function-! but 
its input register is not cleared. The PPU is then assigned to control 
point PN with the new control point number inserted in its input register 
The calling orncram must change the control point address at D-CPAD 
and rewrite the PP status word- 

il.CPJ - Capture Peripheral Jobs 
•CDQ3H-.Q0XX -i XXXX-."f*<* ,Wtm»> 

XXXXXX = Address relative to RA of the buffer where captured . 
job data is to be placed. 

Issued to find a job either in the event stack or in the PP delay 
stack for a control point. First the event stack is searched-, then 
the delay stack. If a job is found-* its data is written to a buffer 
specified in the call. When the end of the delay stack is reached ■> 
an exit is made* 

P1.DFPI - Process Davf i le Message 

■t 0013 tFfff -i fin nn -.*•»«*•■* , «»<»«*•> 

Where : 

FFFF = Dayfile flag bits 

(1P1P1P1 - LWA+1 of message -CPWPin PP0R> 

* Dayfile dump index {flflflfl PPQR} 



The dayfile flag bits-, when set-, determine the foil 
handling -Cbits Q-S set by the_calling PP", bits b-fl 



owing messaae 
by HTR>: 
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Bit Do not send to B display 

1 Do not send to the control point dayfile 

2 Do not send to system dayfile -Cno A display> 

3 Flag as an accounting message 

4 Send to hardware error file 

5 Do not insert the job name in system dayfile 
The possible valye of the dayfile dump index is: 

Q For a system dayfile dump 

1 thru N.CP For a control point dayfile dump 
N.CP+1 For a hardware error file dump 

M..PDP. - Drop PP 

MTR clears the PP control point assignment -Cthe PP status word and 
PP input register are cleared •> 

PI.EES - Enter Event Stack 
■CDOHa-.QQAA'.AAAAVMi-Mw-.SYTTj > 

Where : 

AAAAAA = Ward address of Event Status 

Y - Byte address in word 

TT =» Bit address in byte 

S = F+B 

F.ES0FF 0000 F=0 Assign when bit = 

F.ESON- 400(3 F*4 Assign when bit = 1 

F.ESABS QOOQ B*0 AAAAAA is an absolute address 

F.ESREL 10.QQ B*J» Relative to RA 

F.ESCPA 2000 8=2 Control point address * : 

The event stack is similar to the delay stack and is used by the 
Scheduler- This function writes to the peripheral job table-i the 
PP input register and three parameter words* It then sets up the 
control point number and linkages in the event stack. The new entry 
is linked to the oldest prior entry. Now it clears the output re- 
gister and exists. A separate queue is maintained for each control 
point. 
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il-T ^P - Init iate ^t^ck a roc°sr?r ^^ * /" 

'<. D G "2 ? -, GO 13 X -, * -*"< '» i >< *V,"* ^ C CCO 

X = C Initiate *1SS only if PP active flag = D 

r Initiate 1SS whether PP active flag is set or not 

CCCC = BST ordinal 

A check is made to see if a PP is already assigned to this DST 
ordinal. If noi check for available PP and if one is available! 
proceed to either set the PP active flag or not and then store the 



is full. After the input register has been set up in the available 
PP the message buffers are cleared and the ISP count updated- Check 
for a previously assigned ISP. If noi get pointer to PP reserved 
when no ISP is assigned. Push down the available PP chain. Uhether 
another ISP was assigned or not-i if no PP is avai Tables make an 
entry into the peripheral job table -• identify it as a stack processor 
and push down the stack placing ISP on top. Theni update the PP<2 
count and exit clearing the output register. If after ISP assignment 
check there was a °P available assign ISP to control point zero, set 
the ISP flag for PP status and job queue and exiti clearing the out- 
put register. 

tl ..NOTE - Null Function 
{QQ^i mnmn i hmm, *i nnmm i mhmm } 

** 
This function is for use in debugging PP programs. It may be used 
as a breakpoint. tt.NOTE is cleared by fITR . 

n .NTIflE - Enter New.. Time Limit 
-C u QW'l i T tf T -i T*<»* n »hnh , mm NN> 

A central processor job time limit of TTTTT seconds is entered at 
the control point. Any previous time limit is superceded. If the 
requesting PPU is assigned to control point zero-, the parameter NN 
will give the number of the control point to be considered^ in any 
other case this parameter is irrelevant. 

il.PASS - NTR PASS 



I003&S -|MMMM -, MMMM -, MMMM -|MMMM}- 

Indicates a no operation by I1TR and it will be cleared by another 

routine . 
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.1. PATCH - Ent e r Patch into tITR 
-CDQ4S-,AAAA-.8a68iCCCC-tI)])DI>> 

AAA A = address for BBSS 

CCCC = address for DDDD 

Simply inserts patch at address indicated- flay be used by an 
operator during debugging of flTR. 

H.PPCH - Request Channel Surveilance by PP NTR 
-CGG43^33AA-.2DCCi*»«'*nRRRR3- 

A A = First choice channel number 

33 * Second choice channel number 

CC = Third choice channel number 

DD = Fourth choice channel number 

RRRR = 0- reply immediately ?* Q reply after reservation 

This function is part of the RCH routine. fl.RCH is a CP monitor 
function. If CP monitor requests a channel a nd the request is 
rejected-, the H- RCH function is changed to tl.PPCH-i.in order that fJTR 
can keep a surveilance of the channels until the requested channel 
is free- flTR will update the channel reject history and when the 
'requested channel is available! flTR will change the H.PPCH to PI. RCH 
and initiate CP monitor. 

n.RACT - Request Control Point Activity 

1 00.37 1 »*H N 1 IIII 1 ***>• n KHNX} 

Th is request allows a PPU to know the various activity counts of 
control point -MN at a given time-CNN cannot be zero}. If the parameter 
IIII is non*zeroi the pseudo-activity count will be incremented or 
decremented by the constant IIII {after sign extension}. The reply 
of monitor is made via the PPU output register: 

Byte 1 control point status -CC.CPSTAT} 

2 control point activity {general activity} count 

3 PP delay count 

H pseudo-activity count 

n.RBTSTO - Request R8T Storage 

•CQOlb tSSSS -.MMUM t Ntttt M n MMMM> 

MTR sets SSSS**1008 as the new R8T starting address. 
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S-\C -; - ■",i | i; > ivtjL I:\ti.- g rated 'cneduler 






, r» -i *-» i.» 



:■< - 5 p"j'.:3 -IdOCD ■»C'n?j=0^M> in stack ELSE initiate 
S cr 5 du I *= r "i rr red lately. 

If »'E i "2!! che "cnecLiier-! clear the output register and exit- 
Oth°rui:.-.:, -: ; -eck ;- .Vequest S crick is full and if yes-t call the 
Schedul-?-* to --i-.p-Qy it before nuking stack entry- If stack is not 
fulli n:ake en try * In either case i advance the request stack pointer- 

FT. SEP - Set Zrrcr fla-' 



-T Q-Qjjlj T»**«*if4-iZE!.cE'> > ***" ,>4 i , *******3" 



flonitor will drop the central program at control point NN and set the 
error flag to the value ££££• 

11. SEA - -Assign Job Sequence Number 

"C 002 £ T MUM* -, MMMX i WrtM»« ^ XrfNN }• 

Monitor returns in byte 1 of the PPU output register a job sequence 
number tin display code>- 

ft.SLPER - Initiate CPr.TK in Other CPU 

"COO 4 7 "I ""K" T «*»S4»4 -i NMMM 1 MH=4 M j- 

fl.SLPER is issued to initiate CPflTR in the other CPU- CPMTR 
itself will check and issue the function if the other CPU should 
be executing. 

fl-SPRCL ~ Stack Processor Recall 
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•COQ3Q-.00SS 1 AAAA-,OaOr-,CCCC> 

This function is called with F non-zero when a stack request has 
been completed to update the exit count of that control point 
■CCPSRln and to update the I/O channel time information {if IOTItlE 
mods are assembled on> using SS*AAAA which is the disk factor 
{SS»millisecond/PRV*«4}*PRV count -CAAAA>. If F is zero-i then only 
the I/O channel time information is updated- CCCC is the control 
point area address* 

fl./STEP - flonitor Step Control 

'C00]lS'< M, * MM 1 MMMM 1 l *MMM 1 MNf^J}. 

This control is initiated by a keyboard request. MTR sets an 
internal step control flag and at each subsequent request PJTR 
pauses for console keyboard input. A space from the keyboard causes 
fITR to process the request. A period from the keyboard causes flTR 
to process the request and clear the step control flag to resume 
high speed operation. If NN *. 0, all PPU requests are stepped. If 
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^^JC <C/<wrc 



3 ^ 






NNis non-zeroi control point NN is the only one to be placed in step 
modeA only the requests issued by the PPU's assigned to control 
point N will be stepped- 

II. TRACE - Trace Output ...Registers 
<QQMtiA'AAA-iFF'FFiNNN.MVW»«H«> 

Where: 

AAAA * Absolute address of buffer/1008 -fctypically within 
job's field length} 

FFFF = Field length of buffer/1008 

NNNN » Number of next word pair in buffer. 

This is a function reserved for CDC development. A buffer is de- 
fined for I1TR to dump its trace of the monitor functions issued by 
other PPs. A trace record consists of a two word entry contain 
function and PP status information- 

M-TSR ..- Terminate Storage Request 

"C 0020 t MNMM i MMMM •, MM-M.-M -| i»XHM} 

DSD issues this function when the operator types DIRA8T- This 
function clears the SI1ABT flag to zero- 

This causes the rejection of an fl-RSTOR function that is hung up 
because a control point will not allow itself to be moved- 
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Monitor Request Processi 



he 



.,-•> .-. vr* 







input Register 



*5l8r j 



Output Registsr 



Message 
~- Buffer -J 



CM 




P?n 



10-17 



STUDY QUESTIONS 
Monitor Functions - Section X 

1- The SCOPE Operating System is controlled by a monitor named 

whose residence is in 



H- Monitor functions are assigned order codes- These order codes have 
nothing to do with which monitor will perform the function- 
■Ca> true 
■CbJ false 

3» Some monitor functions codes have multiple sub-functions- 
■CaJ true 
, -Cb> false 

H- Ulhat does the monitor function code M-ICE do? 



5- Some monitor functions cause no action at all- 
■CaJ true 
■Cb> false 

b- The monitor function M-KILL causes 



?• Some monitor functions will reply to the requesting PP immediately* 
others may be delayed- 
•CaJ true 
■Cb> false 
fi« Some monitor functions may only be issued by MTR- 
-Ca> true 
Cb> false 
1«" A new time limit for a job may be effected by issuing the 

monitor function- 



10. A PP programmer may issue a request of MTR by 
11- A CP programmer may issue a request of MTR by 
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STUDY QUESTIONS 
tlonitor Functions - Section X 



1- The SCOPE Operating System is controlled by a monitor named 
kA*TK. whose residence is in P"Q 



tlonitor functions are assigned order codes- These order codes have 
nothing to do with which monitor will perform the function- 

•CaJ true 

<b5) false 



Some monitor functions codes have multiple sub-functions- 

(53^ trua 
■Cb> false 

What does the monitor function code fU-ICE do ?p) [ 



S- Some monitor functions cause no action at all- 
/ia^ true 
•CbJ false / / , 

(.- The monitor function n-KILL causes T*tG- {jZJlL^ZZL <® C*&<5h . 

?- Some monitor functions will reply to the requesting PP immediately 
others may be delayed- 
^a> p true 
•Cb> false 
fi. Some monitor functions may only be issued by I1TR* 
^Tap true 
•Cb> falsa 
H» A new time limit for a job may be effected by issuing the 

^^hJfJ^M^ monitor function- 

10- A PP programmer may issue a request of E1TR by t/S/li*i fC> M/fi 

11- A CP programmer may issue a request of I1TR by g- ?/•>>* &■# -h ( 
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EXTERNAL INPUT/OUTPUT 
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EXTERNAL INPUT/OUTPUT 
Lesson Guide 

REFERENCES: 

PP COMPASS Student Guide Section XI 

TRAINING AIDS: 

Visuals VALS-S3-11-M thru VALS-53-11-7-. VALS-53-11-^ thru 
VALS-S3-11-17-I VALS-S3-11-S3-. VALS-53-11-2L, 

ASSIGNMENTS: 

Study Questions Section XI 

OBJECTIVES: 

-C1J To present the external I/O hardware used by the 
CYBER computers- 

-C23- To introduce the methods used by system I/O drivers 
in performing I/O- 

■C3J To present enough details on external I/O to allow 

coding of a simple PP program which will input some data 
from a peripheral device- 
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EXTERNAL INPUT/OUTPUT 
Lesson Outline 

XI- EXTERNAL INPUT/OUTPUT 

A» Channel Hardware Concepts 
o Connecting device 
o Two way 12 lane path 
o Two traffic control flags 
o CYBER DATA CHANNEL - Graphic 

B* Two Types I/O Devices 

o Designed especially for CYBER 
o Designed oridignally for 3000 

C- Channel Communication 
o SELECT 
o CONNECT 
o FUNCTION 
o Function Code Format Example 

D« How Data Input Works 

■ . £■• How Data Output Works 

F- How Status Request Works 

G« Channel Characteristics 

o Any PP may read/write any channel 
o Nay be "hung" 

o flay be used for PP-PP communication 
o 12-bit bi-directional 

H« Channel Input/Output PP Instructions 

I. Modes of Function Codes 

o Mode I 

o Mode II 
j. Programming the PP for I/O 

o Mode I function codes 

o Flow Chart 

o Instruction Codes 
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Channel I/O Preparation/Termination 

o Using R.RCH request 

o Using R.flTR request 

o Using immediate reply requests 

o Using alternate requests 

o How to drop a channel 

SCOPE Input/Output Software Subsystems 

o CP-CIO 

o CP-SPH 

o OV-CIO 

o 1S5 - ISP OiskJ 

o I/O drives {tape} 

PP to PP Communication over channel 
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EXTERNAL INPUT/OUTPUT 



AH input/ourput operations of the CYBER product lines is 
handled by peripheral processors* These peripheral processors 
•CPPs> are connected to input/output devices by channels as 
shown in the following diagram* 




OianneL 



I/O 
Device 



Input/output operations ars performed using special communication 
codes between PP and I/O devices* 

The Channel Hardware 

The channel hardware may be thought of as a two way path between an 
Input/Output device and a PP* This path has twelve lanes -CbitsJ 
for data or control function traffic* In addition there ar& two 
traffic control devices {flags}- This concept may be represented 
as follows^ 
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CYBER DATA CHANNEL 



sends 


functions 


tests 


status 


of 


channel 



o does 
I/O 




o obeys 
function 



o returns 
status 



PP 

{Internal to 
Programmer} 



I/O Device 

■[External to 
Programmer} 



A/I 



CR 



F/E 



Active/Inactive Flag 

set by PP only 

cleared by PP or I/O Device 

lH-*bit bidirectional channel Register 
holds function codes or data 

Full/Empty Flag 

set by PP or I/O Device 

cleared by PP or I/O Device 
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TWO TYPES 
OF 
I/O DEVICES 

!■• Designed especially for the CYBER/bOQO mainframes- 
a one-shot pulse technique* 



These use 



Example: 



PP 



Channel one 
shot pulse* 



Console 



Controller 



Designed originally for lower 3000 series computersi but used 
on CYBER/bOQO mainframes* These require a converter -Csyncronizer} 
to convert the one shot pulse into a static {steady state} 
signal* 



Example: 



PP 



Steady State Signal. 



T 



Channel 
one shot 
pulse 



bbai 



Data Channel 
Converter 



L 



Card Reader 
Controller 



3XXX 



•405 
Card Reader 
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Channel Communications 



Communication with an Input/Output device over a channel uses 
one or more of three basic actions. These actions are'-, 



1- SELECT 



CONNECT 



FUNCTION 



This will select one of multiple data 
channel converters -Cbbfll's} on the same 
channel' 

This will connect one of multiple I/O 
controllers on the same channel converter 
-CbbS!}. 

This will direct the connected I/O device 
to take some specific action- 



All three of these actions are defined by codes which are referred 
to by the generic term function code- The codes arei however 
very specific for the action desired- The function codes vary 
in format and in the number of functions required to perform an 
I/O operation- Each I/O device controller has a unique function 
code format- The function code format is XXXX or four octal digits- 
Example: Selecti connect and function console D of two consoles 
on the same channel of a CYBER for keyboard input- 

Channel 8 



PP 




! 
i 

V 




































bblS 




bb!2 





Console 



Console 1 



The select-iconnect and function may be accomplished 
in one function code- 

The format of the function code isi 



Select 
Equip- 


Console 
Tube 


node 


Char 
Size 



Specifically the function code to do the input 
in the example is 

7D2Q {octal} 
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Actual communication with an Input/Output device requires a series 
of function code PP Instructions intermixed with other channel 
instruction in the PP- There are instructions for testing the 
condition of a data channel activating or deactivating and in- 
puting or outputing on a data channel* 
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How Data Input Works 



PP 



Channel 



I/O Device 



Selects an I/O device - 
be executing a function 
instruction EAN or FCN 
with the function code* 

Note: The function code 
FUNC must Specify 
the I/O device + 
input mode- 




F 
U 
N 
C 


— 





Responds to select code 
by clearing the Active and 
Full Flags {this says I am 
selected} 



Requests that data be sent 
•Cinput} by setting the 
Active Flag using the ACN 
instruction* 



F 
U 
N 
C 



]> 
A 
T 
A 



**" 



Responds by getting input 
from device storage and 
placing it in the channel 
register and turning on the 
Full flag* 



Removed the data from the 
channel register and clears 
the full flag - by executing 
the IAN or IAH instructions* 



■^ 



Note: Steps 3-* H and 5 are repeated until one of the following 
conditions exist* 
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HO Id DATA OUTPUT WORKS 



pp 


Ch 


annel 


Selects an I/O device 
by executing a FAN or 
FCN 




A 

F 
U 
N 

C 














F 





I/O Device 



Note: The function code 
roust specify the 
I/O device + output 
mode 



Alerts the I/O device by 
setting the active flag 
with a ACN 




-«=- 



Responds to select by 
clearing the active and 
full flags 



Sends the data to I/O 
Device by putting data on 
channel and setting the —• 
full flag with I API or OAfl 



A 






^ 













Note: 



Accepts the data and clears 
the empty flag 



Steps 3i Hi and 5 are repeated until all the data has been 
transmitted- 



Deactivities channel by 
clearing the active flag 
with DCN instruction 
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Encounters an. EOR 
and clears the Active 
Flag- 



Inputs the desired data and 
clears the Active Flag by 
executing a DCN instruction 
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HOtii STATUS REQUEST UORKS 



PP 
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Channel 



I/O Device 



Sends a select request 
to I/O device by exe- 
cuting a FAN or FCN 



Note: The function 

code must specify 
the I/O device + 
status mods* 



*e 



Responds to select by 
clearing the active and 
full flags 



Request a status by — 
setting the active flag 
with an ACN 



*^La 



Responds to status request 
by putting status on the 
channel and setting the 
full flag. 



Inputs status from 
channel and clears 
the full flag by 
executing an IAN 



_A 
< 

— ^t 



Inactivities channel and"" 
clears active - by exe- 
cuting a DCN instruction- 
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CHANNEL CHARACTERISTICS 

o Any PP may read/write any channel 

o Composed of a 12-bit bi-directional register + two flags* 

o The communication language is composed of function codes 
and status replies^ 

o flay be "hung" by using wrong code sequences* 

o Has no hardware interlock to prevent undisciplined usage« 

o May be used for communication between two PP's- 
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v al s-s 3- n-m 

T?I7 INSTRUCT IONS 



! i\ '! 



A ui'V 






r ^j^i 



EU*vl 



v 

I 



) 



*** t~% r'\ -\ y i ■"— 



NNEL ACTIVE flag 



check\ "CHANMEL FULL flag 



ACM '.:'•* -activate channel 



DCN. 


* 


F&G. 


* 


■■ .-' ' r 


? 


FAN 


* 



deactivate channel 



send function code •? 



s.end function from A 



I AM 



i nput a word to A 



I AM ** input a block to ?.B-:memory 



OAN 



output a word from A 



0AM 



* * 



output a block from P? -memory 



* THESE 
♦♦■THESE 



INSTRUCTION'S CAM HAMG THE PP 
INSTRUCTIONS CAM o£ A NOP 
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Nodes of Function Codes 

Some Input/Output devices require function codes of more than 
nine bits- This coupled with the length of the equipment identifier 
■Ct bits} require a total function code of greater than twelve bits- 
This forces the programmer to use two function commands-i where one 
command would have ordinarly been used- To allow function codes of 
12 bits to be passed to the Input/Output devices-" a special format 
of funtion codes was developed- To distinguish between the normal 
function code format and the extended function code format-* a mode 
designation was used- The mode disignations along with their formats 
are: 



Mode X 



This function code format is used when the Input/Output 
device requires only T bits of function data- The format 
is: 



Equip- 
No- 


Function 



11 



node II 



This function code format is used when the Input/Output 
device requires the full 12 bits allowed in the function 
data- The format is: 



Function 



11 

These two modes of function codes are distinguished by the high order 
{leftmost} octal digit- The Node I function code may contain an 
equipment number- from H thru ?- Other octal digits in the equipment 
no- position ar& used in the mode II function- Some differences in 
the mode I and mode II function codes are illustrated below- 
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Differences Between node I and II 



node II 



Conn 



[initiate 
! Conn ! 



I Output 
I Conn 
Code 



FNC lODChCh. 



LDC EUUU ie 1DD1 

ACN ch- 

OAN ch- 

FJM *ich 

DCN ch 



Node II 



! Func'- 



jlnitiatel FNC HQQtch 
Func 



(lode I Conn 



FNC MiDDD-iCh 



node I Func 
Func 0XXX->ch 



Output 
Func 
Code 



U>C XXXX-»ch ie 5000 

ACN ch 

OAN ch 

FJP1 *ich 

]>CN ch 
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khjQ-CKf COT ft 



HTR ^ut\o. 










:DCN 



FWC 5,0003^ 



i^. 



3xxx 




FtoC OXXX^cJk 









JkUra*\? MC 












ftCLtO ClJb (3Ui«A $H, oil 

Dew cL 



o* 



PNC 



t-udtci* 



fcjSPim Bo?*, dv? 







\' 



3XXX 




£*JrO*l 



PNC i*3oo,dk 
ftcro <^ 




(F3fA * } ds 









jwta=\? mc 




PNC \30DE i c 



. V 



$ Q U XT 



FvOC 3.\dft3.c>w 
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SCcPS 



INTRODUCTION 



INPUT/OUTPUT 
SoPTW /}/=£, 
5<tf^ SyS/2/*S 




Tnput and output request processing depends upon the source of each 
request. Active user CP programs issue RA + 1 requests for I/O which _ 
are cycled through CPNTR. PP programs request I/O by placing a moni- 
tor request into their PP output register. System programs-, which 
run at control point N.CP+1 cannot make monitor requests through RA+1- 
Since they run as CP service functions for PP programs-) they make 
such requests through the output register of the PP servicing the 
program. 

CPHTR assigns the I/O request to CP-CIO for I/O buffered requests or 
has flTR assign a PfiU for CIO -G circular input/autput>-. who processes 
requests for magnetic tape-, teletype-, and unit record I/O. bJhen 
actual disk I/O is required CIO /CP. CIO cause a copy of 1SP/1EP to be 
loaded to actually access the disk. 




h*t /<rwr<i 



Mn>Stor>4* 
I/O Of n*n 



Another I/O processor-. JANUS-, exists in SCOPE-, but its function is 
limited to processing unit record I/O for the system input and output 
queues. The queues contain job input and output files and are re- 
lated to the job processing activities of SCOPE. 
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CIO - 

The Circular input/output processor consists of the central memory 
program CP-CIO, the PP program OV-CIO and several PP I/O drivers- 
A system programmer can write his own input/output software-, or he 
can have his program generate a call to CIO. Before calling CIO, 
the program must set up circular buffer parameters and the CIO 
operation code in the file environment table -CFETJ for the file. 
The relative address of the FET is placed in the CIO call. 

A PP routine places a CIO call in its PP output register^ PPflTR 
passes it through the CP input register for the CP-HTR. A CP pro- 
gram places a CIO call in the CP request register -CRA + 1>. When PPflTR 
accepts the CIO call, it assigns a PP and clears byte Q of the PP 
output register. ■. 

When CP.HTR detects a CIO call-, it passes it to CP-CIO if the request 
is for a buffered file or to CIO, for validation and selection of the 
proper routine to supervise execution of the function. The CIO is 
then reissued via,. the request stack and CP.flTR to be processed by the 
required PPCIO driver, byte zero of the RA+1 register is cleared. 
When the I/O operation is. completed CP-CTO adds one to the code/status 
field of FET word one. As all CIO codes placed in the FET code/status 
field are even numbersi an odd number in that field signals completion 
of the operation {or that the file is not- busy}. 

SCOPE CIO CODES {3-4} ? 

All codes indicated by * are illegal; all reserved codes are illegal. 
All codes are octal for coded mode operations^ add 2 for binary mode- 
Example: 010 is coded READ, 012 is binary READ. 



ooa 


RPHR 


0S4 


M 


130' 


CLOSE, NR 


004 


WPHR 


0b0 


UNLOAD 


134 


M 


010 


READ 


QL4 


** 


140 


OPEN 


014 


WRITE 


070 


RETURN 


144 


OP EN, WRITE 


020 


READSKP 


07M 


M 


ISO 


CLOSE 


024 


WRITER " 


J. 00 


0PEN,NR 


1S4 


M 


030 


M 


104 


OPEN, WRITE NR 


lbO 


•OPEN 


034 


WRITEF 


110 


PosnF 


144 


14 


040 


8KSP 


114 


EVICT 


170 


CLOSE, UNLOAD 


044 


BKSPRU 


120 


0PEN,NR 


174 


CLOSE, RETURN 


QS0 


REWIND 


124 


M 
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3S4 


w 


3b0 


n 


3b4 


M 


370 


CLOSER-. UNLOAD 


374 


M 



503 Series Per Special Read cr Urite -Crs ;^sg -. skip-* non-stop-. 
rewrite -i etc-> 

aGO SEA DC 533 « 3=/- ** 

20'-* iJRITEC ' 234 REuRITEr . 2*0 READN 

210 READLS 240 SKIPF 2tM tJRITEN 

21M REWRITE 244 x 273 *• 

220 * -, 250 READ.NS 27M « 

224 REWRITER 

300 Series for Tape OPEN and CLOSE 

300 OPENiNR 324 « 

3QM * 330 CLOSER 

310 » 334 * 

3m h 34Q OPEN 

320 •« 3S0 CLOSER 

MOO Series {Reserved for CDO 

SQQ Series {Reserved for Installations! 

bQO Series 

tsOO h b30 ** 5=54 * 

L.04 n _k34 h bkO " 

blQ h b40 SKIP8 bb4 « 

b!4 «• b44 * b70 " 

b20 * bSO h b74 » 

b24 « 

7000 Series {Reserved for CDO 

C IRCULAR BUFFER 

A circular buffer is a temporary storage area in. central memory 
through which data passes during 1/0 operations. It is termed 
Circular because 1/0 processing routines treat the last word and 
the first word of the buffer area as contiguous." 

FIRST is the first word address of the circular buffer. Routines 
that process 1/0 never change the value of FIRST. 

LIMIT is the last word address + 1 of the buffer area. No data is 
stored in this word- When LIMIT is reached-, the next address accessed 
is FIRST. Routines that process 1/0 never change the value of LIMIT. 

OUT is the next location from which data is removed from the circular 
buffer. CIO or the calling program changes OUT depending on whether 
the operation is read or write. 

IN is the next location into which data is written- CIO or the 
calling program changes IN depending on whether the operation is read 
or write. When IN*0UT»1-. the buffer is full. A partly fil led- buffer- 
extends from OUT to IN-i • 11-25 



VALS-53-ll-ab 



LIMIT 







IN 


Space for Oata 


OUT 


i 


wWm 

////// Data / //// 




FIRST 




Space for Oata 





,..**" 



Circular Buffer 






W////////////////A 






WkW^w 






w^kWmW/ 


w 




Space for Oata 




'W^WS? 


oy//y 




yvyyyyyVyy/ Data Ayyy 


yyyyy * 


MIT—*- 


MMmmy%, 


• 



The circular buffer must be at least one ward larger than the 
length of one PRU. For a write operation at least one PRU of data 
should be in the buffer. For a read operation the buffer must have 
room to receive one PRU of data* Less than one PRU may be trans- 
mitted only if an end-of -record is read or written. 
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CIO OPERATION 

When nTR initiates CI0-. either version-, to perform file I/On CIO 
locates the FNT for the file- If the FNT pointer in the FET is non- 
zero-. CIO checks the FNT entry indicated by the pointer to determine 
if the file name in the FNT entry is the same, as the file name in 
the FET; it u/ill also check that the file is assigned to the job 
control point. If the names do not match or if the FNT pointer is 
zero-* CIO will search the entire FNT for a file assigned to that 
job control point with a matching name. If the file is not foundi 
CP. CIO will create a FNT entry for the file. Such files are always 
local and assigned to allocatable devices. Once the FNT entry is 
found or created-. CIO stores the address of the FNT entry in the 
FET. The FNT pointer in the FET facilitates the FNT search. 

If file status is busy. CIO posts the request for rescheduling and 
exits- Otherwise-. CIO checks the code field in the FET against 
the last code/status field in the FNT to ensure the requested oper- 
ation can legally follow the preceding operation. If not. CIO 
replaces the RA+1 call with a request for the PP program CEM which 
handles error messages-, then reissues the RA+1 call to be processed 
again by CP.MTR. If the operation is legal i CIO transfers the 
code/status field in the FET to the last code/status field in the 
FNT. The proper CIO routine is selected to supervise function 
execution. 

Uhen the file is opened-. CIO' determines if the file is on an allo- 
catable or non-all ocatable device or is ECS resident by checking 
the device code in the second word of the FNT. If the file is on 
an allocatable device-. CIO puts the request in the I/O request 
stack in CUR. The stack processor CP*SPM schedules I/O on allo- 
catable devices^ it will perform the I/O and set the completion 
bit. PP. CIO and its overlays process I/O requests for non-all ocat- 
able- '- 

Uhen PP. CIO is required-. PPHTR assigns an available PP and causes 
CIO to be loaded and initialized. Depending upon the operation-. 
CIO will call one or more of the following overlays. 

Function Routines* 

1CL File Close 

10P File Open 

IMF Multifile Positioning 

1RP Reel Close 

3B0 Mass Storage Device File Open " 

MES Enter Stack Request -Cmass storage I/O} 

bUM Unite Error Message 
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Tape Drivers: 



Read 7-track stranger -CS3- tapes 
Read ?-track SCOPE standard labeled tapes 
Read/write L -CLong Stranger> tapes -C?-track> 
Read 'l-track stranger -CS> tapes 
Write T- track stranger CS> tapes 
Write ?- track stranger -CS> tapes 
Write 7-track SCOPE standard labeled tapes 
flove tape forward -Cexcept long record <L> tapes> 
Move tape backward -Cexcept long record CL> tapes> 
■uix , 'Read 1-track SCOPE standard labeled tapes 

IfcH Write T^track SCOPE standard labeled tapes 



IRS 
1RT 
1HT 
INR 
1NU 
1WS 
1WI 
1TF 
2T8 
1R1 



On line care 


punch- 


On line care 


reader 
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error 


recovery 
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error 
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Unit Record Drivers! 



2PC 
SRC 
SLP 



1P1 Write error recovery - tape positioning 

IPS Write error recovery - erase/rewrite 

1P3 Write error recovery - verification driver 

1P4 " Write error recovery - final driver 

1RV Initialize/terminate read error recovery ^ 

IRS Read parity error recovery 

1R3 Read error recovery - position/reread .-;■>"' 

•*l'?v v a "Nofs-e -error recovery - read error processing "%/ 

INS Noise error recovery - read recovery driver ^ 

1N3 Noise error recovery - skip noise record 

. 1CS Write CM data - 7/^ track stranger tape read recovery 

1CT Write Cfl data - 7/^ track SCOPE standard tape read 
i recovery 

1CR Write Cfl data - 7-track other tape read recovery 

If the file device code is for a non-alloca table device-. PPCIO loads ".. 
an I/O driver into its PP to perform the actual I/O. The overlay 
selected is determined by the operation requested. For example •• if 
a user issues a request to read data from a file on a SCOPE standard 
format 7-track tape-. CIO will call the overlay 1RT into its- PP. iRT " 
will reserve one of the hardware channels connected to the equipment-' 
It then issues the function codes to connect the controller and tape 
drive- 1RT issues functions to transmit. one PRU of data from the 
tape driver over the data channel. - 

1RT accumulates the PRU of data in a PP buffer. When the entire PRU 
is transmitted or an end-of-record {short PRU> is encountered-. 1RT 
picks up the pointers to the circular buffer in central memroy from 
the FET. 1RT continues to transfer PRUs of data from the- tape - through 
the PP buffer to the circular buffer until the buffer is full or an 
end-of-record is encountered* 1RT updates the PRU count in the file 
FNT-. releases the channe 1 -. se ts completion bits in the FNT and FET-. '"J, 
and drops out. ) 

The following charts depict the logical sequence of events during 
various CIO tape operations. — ■ "■"'.. 
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READ 



1. Exit if not enough room in buffer far 
one maximum size physical record. 

2- Exit if not enough room in buffer for 
MLRS words. 

3. Read one physical record into PP. 

M. Read one physical record into CH. 

5. If physical record exceeds maximum 

allowable i return error status DEVICE 
CAPACITY EXCEEDED and perform error 
procedures • 

L. If physical record exceeds maximum 
logical record size-i return error 
status DEVICE CAPACITY EXCEEDED and 
perform error procedures. If a long 
record is encountered-! excess infor- 
mation is discarded without notifi- 
cation to user. 

?. If end-of-file mark was read-i perform 
end-of-file mark procedures - 

fi. If noise records encountered! go to 3- 

*}. If parity error -. perform parity pro- 
cedures'. . 

10. If tnd-of-tape reflective spot was 
encountered and taps is unlabeled! 
perform end-of-reel procedures. 

11. If short PRU was read-, strip level 
number. . 

'12. If zero length PRU was read-, go to 
51. 

13. Uhen bbSl is present -i convert data 
in PP from BCD to display code. 

1M. When Ubfll is present-i convert data 
in Cn from External BCD to display 
code . 
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READ {continued> 



■s\ 



IS- Convert lb3S line terminator to 0003 

Ik. Transmit data to Cfl. 

1?. Update IN. 

l.a. Fetch OUT from Cfl - 

1T» Place in word 7 of FET the number 

of unused bits in the last data word- 

20. If full PRU-, go to 1. 

21. If last record was level 17 of tape 
mark-i set end-of~file status. 

22. Set end of record in status field of 
FET and exit. 
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1. Exit if not full PRU. 

2. If data from OUT to IN exceeds maximum 
logical record size from FET, return 
DEVICE CAPACITY EXCEEDED and perform 
error procedures- 

.3 • Fetch number of unused bits in last data 
word from FET and adjust record length- 
If record length constitutes a noise 
record, return DEVICE CAFACITY EXCEEDED 
and perform error procedures . 

4 - Read one PRU 'of data starting at OUT 
from CM to PP. 

S« Read data contained between OUT and IN 
from CJ1 to PP." Adjust by unused bit 
count. 

L>. Uhen bbSl present, convert display code 
to BCD in PP memory. 

7. Uhen bbfil present, convert from display 
code to BCD in Qfl. 

8- Convert zero byte line terminator to 
lb32. 

1. Urite record to tape. 

10. Write from Qfl to tape, data contained 
between OUT and IN, adjusted by unused 
bit count- 

11- Uhen bbBl present, convert data in CM 
buffer back to display code. 

15. If parity error, perform parity 
procedure • 

13. If end-of-tape reflective spot, perform 
end-of-reel procedures- 

14. Update OUT. 

15. Exit. 

lb. Fetch IN from CH 

17. Co to i. 11 ~ 31 
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1. If IN - OUT, exit. 

2* If PRU not full, insert level number 
in PP buffer. 

3. If data from OUT to IN exceeds maximum 
logical record size from FET, return 
DEVICE CAPACITY EXCEEDED and perform 
error procedures • 

M. Fetch number of unused bits in last 
data word from FET and adjust record 
length. If record length constitutes 
a noise record., return DEVICE CAPACITY 
EXCEEDED and perform error procedures. 

S. Read one PRU starting at OUT or between 
OUT and IN- whichever is smaller, from 
crt to PP. 

b. -Read -darta' between OUT and IN from CH 
to PP- Adjust by unused bit count- 

?. Uhen bfafil is present, convert display 
code to BCD in PP memory. 

fi. Uhen Ub&l is present, convert display 
code to BCD in CI1. 

*i. Convert zero byte line terminator to 
lb32. 

1Q. If IN * OUT, write zero length record - 
Co to 12. 

11- Urite record to tape. 

12. Urite data between OUT and IN from Crt 
to tape, adjust by unused 'bit count- 

13. Uhen tbfil is present, convert data in 
CH buffer to display code- 

14. If parity error, perform parity proce- 
dures. 



If end-of-tape reflective spot, perform 
end-of-reel procedures. , 



IS. 

lb. Update OUT 
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URITER {continued: 



1?. Exit. 

13. If full PRU is not written-, exit. 

lH . Go to 1 • 
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URITEF 



1. If no data from OUT' to IN-, go to S3. 

2- If no data from OUT to IN-, go to IT- 

3- If not full PRU-. insert level number. 

4. If data from OUT to IN exceeds maximum 
logical record size-i return DEVICE CAPA- 
CITY EXCEEDED and perform error proce- 
dures. 

5. Fetch number of unushed bits in last 
data word from FET and adjust record 
length. If record length constitutes a 
noise records return DEVICE CAPACITY 
EXCEEDED and perform error procedures* 

b~ Fetch one PRU. of data starting at OUT or 
data between OUT and IN-, whichever is 
small err from CN to PP- 

?. Read data contained between OUT and' IN 
from CN to PP. Adjust by unused bit 
count. 

fl. Uhen h>h&% is present-i convert display 
code to 8CD in PP memory. 

I. Uhen fatal is present-, convert display 
code to BCD in CN* 

10- Convert zero byte line terminator to 
■ lfc»32 • 

II. Urite record to tape. 

12- Write data between OUT and IN from CN 
to tape-, adjust by unused bit count* 

13* Uhen febSl is presents convert data in 
CN buffer to display code. 

14. If parity error -i perform parity 
procedures . 

15. If end -of -tape reflective spoti perform 
end-of-reel procedures* 
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URITEF {continued} 
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17. Write end -of '-file mark and exit. 

lfi. If full PRU is not writteni write zero 
length level 1? record and exit. 

n. Go to 3. 

20. If last operation was WRITEt write zero 
length PRU . 

51. Go to 17. 
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STUDY QUESTIONS 
External Input/Output - Section XI 

1- In the SCOPE Operating System all Input/Output operations are 
performed by ■-'-., 

5« A channel may pass information in more than one direction- 
■CaJ true 
■Cb> false 

3- More than one PP may read data from a single channel concurrently- 

■Ca> true 

ibJ false 

4- All PP's are connected to all channels- 

-Ca> true 
■Cb> false 

5- What function does the Active/Inactive flag serve? 



b- The Active Flag may be set by 
7- A bfafil is a . 



fl- Input/Output devices are directed by codes- 

T. flost channel instructions will hang the PP if not executed in 
proper sequence- 
■CaJ true 
■Cbl false 

1Q- Some channel instructions may act as a NOP- Which One-CsJ? 

11- Channel function codes are or bit 

in length- 

13- There is a hardware interlock to prevent more than one PP from 
using a channel that is already busy- 
■Ca> true 
-CbJ false 



ll-3t 



STUDY QUESTIONS 
External Input/Output - Section XI 

1- In the SCOPE Operating System all Input/Output operations are 
performed by .Tr.S » 

H- A channel may pass information in more than one direction* 
^a^) true 
•Cb* false 

3- flare than one PP may read data from a single channel concurrently. 
.^*a^ true 
•Cbi false 

M- All PP* s are connected to all channels- 
^ia> P true 
-Cb> false 

S- Uh at function does the Active/Inactive flag serve? 

L- The Active Flag may be set by TH*^ r£ - 

7. a bfaai is a cd^-ra ow*A*i>A,<e<{ cor^otsWT&jr ? 



fi- Input/Output devices are directed by 



-TH.H cTt'QK c odes* 



T- Most channel instructions will hang the PP if not executed in 
prop er se quence - 
CtaJJ true 
ibJ false 

10- Some channel instructions may act as a NOP- Which OneisJf 

0T4M QAM ; 

11- Channel function codes are f .. or -..--. bits 
in length - 

15- There is a hardware interlock to prevent more than one PP from 
using a channel that is already busy- 
■Cal true 
£*b> ) false 
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13- Monitor manages channel activity. How does this effect the 
PP programmer? 



1M» In SCOPE the disk Input/Output is handled by 
•CSubprogram-Cs»« 



IS- Tape Input/Output activity is managed by 
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13- Hanitor manages channel activity- How does this effect the 

PP programmer* \\^ &Ua*4/lJi 'TM M.«^r C-^"> d^vH^Lr f^^^fLf 

m- In SCOPE the disk Input/Output is handled by LSJlL 
{Subprogram-Cs}}- 

IS- Tape Input/Output activity is managed by .. ■ £~Z * ~Q . • 
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DEADSTART 
Lesson Guide 

REFERENCES: 

PP COMPASS Student Guide Section XII 
Systems Programmers Reference 

TRAINING AIDS: 

Visuals VALS-53-12-S-. VALS-S3-1S-10-. VALS-S3-12-11 

ASSIGNMENTS: 

Study Questions Section XII 

OBJECTIVES: 

-C13- To present the sequence of events from the time the dead- 
start button is pushed. 

-C21 To give an overview of the software routines in the 
deadstart package* 

■C3* To present enough details of the deadstart matrix switch 
program to allow the 'system programmer to change tape 
channel selection for deadstart ing. 
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DEADSTART 
Lesson Outline 



XII- DEADSTART 



A« Pushing the Deadstart Button - Master clear 

o Master Clears all I/O channels 

o Deselects all I/O equipment 

o All channels active and empty 

o Selects all bbfil's in system 

B- Pushing the Deadstart Button - Hardware Boot 

o Causes all PP to "wait" - IAM 

o Causes program in matrix switches to be read into PPO 

o Disconnects Channel 

o Disconnects Channel 15 

o Connects to Channel 15 -Cdeadstart tape> 

o Reads first record of tape 

EOR on tape drive disconnects channel 

C' Pushing the Deadstart button - Software Boot 

o Software -CCEAJ read into PPO 

o CEA execution 

D- Matrix Switch Program 

o bQX/b5X tapes on channel 

o bQX/bSX tapes on channel 1-11 

o bQX/bSX tapes on channel" 15-13 

o bQX/bSX tapes on channel Q- no bbfll 

o Warmstart - bbX tape - no bbfll 

o Uarmstart - bbX tape i channel 15-13 

o Uarmstart - bfaX tapei channel 15-13 no bbfll 

o Coldstart from card reader on channel 15-13 

o Coldstart from card reader on channel 1-11 

E* Deadstart Tape Records 

o CEA 

o D 

o CMR 

o EST 

o IRP 

o P 



STL 15-5 

o IRCP 



F- Deadstart Software Flow Charts 
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Deadstart 

The deadstart procedure is initiated by momentarily pushing the 
deadstart button either on the console or on the deadstart panel - 
Pushing this button causes the fallowing: 

I- Master Clear 

1- Master clears all I/O channels 

2* Deselects all I/O equipment in system except deadstart panel. 

3* Sets all channels active and empty* 

4* Selects all bbSl's in system* 

II* Deadstart Hardware Boot 

S* Causes all PP's to "wait" executing an IAN instruction on the 
channel corresponding to the PP's number* 

V* Causes program in deadstart panel {matrix switches* to-'be 
read into PPO location 01 thru 14 octal* 

?• Disconnects channel Ch causing execution to begin at location 
□1 in PPO- 

fl- Disconnects channel 12 -CLbfil still selected** 

T* Connects to HT with deadstart tape- 
ID* Reads in first record of deadstart tap-e- 
ll- EOR signal causes PP to disconnect channel 12 
III- Deadstart Software Boot 

12* Software program £CEA> just loaded by the above steps begins 
execution at location D01S in PPO- 

The deadstart procedure continues with a complete series of software 
programs as outlined in the flowcharts below* The deadstart package 
consists of the following decks: 

CEA 

CONTROL 

IRCP 

STL 

TDS 
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For all panel settings* a 1 indicates the up or set position; a indicates the 
down position. 

Dead start Panel to Head fro* 60x/65x Tape on Channel 



ADDR2SS 
0001 
0002 
0003 
000* 
0005 
0006 
0007 
f 0010 

^ ootr 
li^ 0OT2 



■*■- ("*■■■' 



Bimact octal. 



11 t- 111 00 00 7700 

e e e r r r t» • nun e r u u 

111111 0" 7 7 

0; > T > 10 

1 1 1; > 1 1 t -■: 03- ■■.< 0; 7 7 

ft fc v t 0* ; = = 0? "fr ■? s 0* 1 4 » 

1 tit?v^yk1 0ft? , i OF * Os * 7 « O 0» i 
1 t T •■;"■'; O 1 O-OsO&aarS- O O 0*s**? TM 0-^03^3. 

oSi" 0OO*f;0 Of^wsJ^O* fe-ts*£s-'-' 0- 0&1 3 

' o£- the^pene*. is- xxxeleiwwtSfc - »-" : '"— ^- "' : 

■/■•-: Ta^ercoetxolXegr nuwfa e jr - C^og gees-tsar} - 
■ .-■ Tiitwi unite, needier - '---'■■■' 

vs»0*s*se»switett- (t ifi.ppo is note to be 



Parte! to Beads fro*- 60x/65x Taps- on Channel 1-11 



0001 1 v ts ■ £ .0 t t- - 

0002 O^OS c' 30 O 0*r f 

0003 1 1 -;1>i ■* £107 
Q00* *. 1 laTr a "1 f 1 

0005 e e-«*' : ."'*rr r-" 1 

0006 1 11 2 it t 1 

0007 1. • t O - 

0010 1 11- TOO ~ 

0011 11 I." JO 1 

0012 ooo= ro~o"d" 

0013 

OOia 1110 1 



e» —v -e e ess'- 
OK? -0 T t 

cs- -> -c c ct 

Oei r;:ce «:• 
0- n> *-i '« « o- 



Oc 

00 o- 

eu 
c 
1 

1 



c e e 

3 
'« c c 
c c c 
011 

1 



7 3 e e 

1 3 'i 
7 5 ecr 
7 7 e c 
e tan 
7 7 c c 

1 a s 
7 a oc 
7 1 c.c 

13 

7 112 



cccc Tape channel niaber- {1-11} 

eee Tape controller nuwber (4 or greater) 

uuuu Tape unit number 

s PS0 save switch' (1 if PP0 is not to he saved) 

rrr CMS nuatoer (000 for first CJS) 
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Dead start Panel to Read from 60i/65x Tape Channels 12 or 13 

ADDBBSS BXNABT QCTai* 

0001 111 10 1 00c c c c 7 5 c c 

000 2 111 111 00c ccc 77cc 

000 3 e e e r r r u u u u a r u u 

QQQH 111 1110 0c ccc 7 7 c c 

0005 ; ,000 001 000 0010 

0006 111 111 0c ccc 77cc 

0007 1 ; 10 . . .-,- s 1 * 3 

0010 1 1 t: r •: 1 : c :• ec c 7 » ec- 

0011 1 1 1 * ' 1 cr > c C cr 7 1 cc 

0012 0(h ; • o o ■■-. V- t?~ O 1 tr v - 1*3 

Q» remainder o* tbe panedL i*- - i*r«i«r«nfc.— 



cccc - Tapm cha nn e l- tomtoms. (12 oac--l3> j. > 

ee« Tap*- controller- numb e r - <% or greater) 

warn ■ Tap«»< trait: n u mbe r .jts*!?:-;-. it i:-^- ----- :■-• 

a PPO saw* SMitsir (1 if> PS© is nofc to be saved) 

. art' CMfe number? (000a for? firefeOai*>~r^-^- -a-^.v 

Deadsfcart- Panel (Warmstart) to Read, f rear 6<at Tape^on. C h a nnel 
wi th o ut a 6681 Data Channel converter 

ftDDSBSS BXSARI •,-• -■•.■;" .:;:■-■ ZZ ■ CXSXt, :: ■ 

0001 Or. 0"; 

0002 0-1 1 11 -0 0- ■:■ 1- r 17 1 ~ 

0003 ) 1 1 1 1111 0- ■■'- 5 7 6 
000* 1 <h '. .1 .00 Or 1 000 2 « 00 

0005 1 0- - '.rl r r rr: s 2 * r » 

0006 1 11 -111 0^ •:• 0- t 7 T r 

0007 e e e " d ; .1 1 u u u u e d 6 u. 

0010 1 1 1 ■■•-■■- 10 0, • .0 0" 7 4 00 

0011 1 1 1> "■• '"0 1: -. 0- .0 0: ; *7 1 

0012 Q 1 110 13 

The remainder of the panel is irrelevant 

see Tape controller number- 

uuuu Tape unit number 

s PPO save switch (1 if PPO is not to be saved) 

rrr CMR number (000 for first CMS) 

d Tape density (0=556 bpi, 1=800 bpi) for 7-track only 
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Deadstart Panel (Warsstart) to Bead from 66x Tape on Channels 1-11 
without a 6681 Data cha n nel converter 
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3 c c 


0002 



















1 


1 1 





1 3 


0003 




1 1 1 


1 


1 








c 


c c c 
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uuuu Tape? unit • 

;. a --' pee* saver switch {1 if-'PSO-not-to- be- saved) 

rrr <3» number {000 if first CMS) 

d Tape^deasity (0-556 bpi, 1»800 bpi) for 7~track only 

Deadstart Panel (Warawtart) to Read frea 66* Tape on C h a nne ls 1-11 with 
a 8681 Data Channel converter 
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ADDRESS 

0001 

0002 

0003 

000* 
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0006 

0007 

0010 

0011 

0012 

0013 

0014 
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1 11 
1 1 1 
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1 1 1 
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13 
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7 7 c c 
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7 * c c 
7 1 c c 
13 
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ccce Tape channel number (1-11) 

eee Tape controller number 

uuua Tape unit nuaber' 

s PPO save switch (1 if PP0 not to he saved) 

rrr CMR nuaber {000 if first CMS) 

d Tape density (0*556 fapi, 1*800 bpi) for 7-track only 
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Deadstart Panel (Warns tart) -to Read from 66x Taps on Channel 12 or 13 
Without a 6681 Data Channel Converter 
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The remainder- of the paneA la irrelevant* 

cccc - Taper channel nuafear (12 or- 13) 

eee Tap* controller nuaber, 

mm Tape unit no a b e c 

s PP0 save switch (1- i£,5S0 %s not., to be saved) ' 

rrr *' CMR nuaher (00O if fira*-CSR)_ 

d - Tape denaity (0»556- bpi.* 1=800 bpi) for 7 -track only 

Deadstart Panel (Warastart) to Head fxoa 66x Tape on Channel 12 or 13 
with a 6681 Data Channel converter 

ADDBBSS BIHaai OCTAI. 

0001 11110 1 0c c c c 7 5 c c 

0002 1 111 000 0011701 

0003 10 1 111 110 5 7 6 

0004 111 111 0c c c e 7 7 e c 

0005 10 0f r r r s 2 1 r a 

0006 111 111 c c c c 7 7 c c 

0007 «ee d 1 1 u u u u e d 6 u 

0010 111 100 0c c c c 7 4 c c 

0011 111 1 0c c c c 7 1 c-c 

0012 00 00 001 011 00 13 

The remainder of the panel is irrelevant* 

cccc Tape channel number (12 or 13) 

eee Tape controller number 

uuuu Tape unit number 

s PPO save switch (1 if PF0 is not to be saved) 

rrr CMR number (000, if first CMP) 

d Tape density (0=»556 bpi, 1=»800 bpi) for 7-track only 
(ignored for 9-tracfc tape) 
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Deadstart Panel (Coldstart) to Read from Card Reader on channel 12 or 13 
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The remainder of the panel is irrelevant. 

eeec Card reader channel number (12 or 13) 

eee card reader co ntr oller number (4 or greater) 

s PP0 save switch <1 if PPO not to be saved) 

rrr OCR number (000 if first CSR) 

tttt Tape channel number (66x) for deadstart tape 

nnnn Tape unit number (66x) 

d Tape density (0*556 bpi, 1*800 bpi) for 7-tracJc only 

(ignored for 9-track tape) 

Deadstart Panel (Coldstart) to Read from Card Reader on Channel 1-11 

ADDRESS BIHARX OCTAI. 

111 0.11 0c ccc 73cc 
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0002 
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0004 
0005 
0006 
0007 
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0014 





1 1 1 
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13 
7 5 c c 
7 7 c C 

e r t t 
7 7 c c 

1 4 d s 
7 4 c e • 
7 1 c c 
7 6 6 4 

7 112* 



cccc Card reader channel number (1-11) 

eee Card reader controller number (4 or greater) 

s PPO save switch (1 if PS0 not to be saved) 

rrr CHR number (000 if first COM) 

tttt Tape channel number (66x) for deadstart tape 

d Tape density (0*556 fcpi # 1*800 bpi) for 7 -track only 
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DEAaSTART - PHASH 1 
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PP1 
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Control 
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Display 
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COFE SYSTEM TAPS 



The released SCOPE 3.4 system (deadstart) tape consists of 21 + n records, each followed by an EOR. 
where n is the number of programs and overlays In the tape: 

Name Description 

CEA PPO s* 7 * pwsBrt 

C£- Diagnoses See next page 

CED Deadstart PP control pit a yjaa — resides in PPO 

133R Read drive* for 60s. 65x tap* drive — in PP2 

' MDR Read drive* fee 66a tape «M*es - in PM and ??3 

De a dstart damp centre? progran, fcsndla options — ia PPO 

'■DMT s av . a aagDtfBt^ad*W'farc^6Sact9>diiyB.^iaPFd 

DTS Pomp megntac tape driver for 66x tape drives — la PPO 

• CMR ' Central JD«s«y nsadsat (op to S copks) 

"'•■COM Deadsdaxt option matrix gssstattr — in PP2 

'. ' EST Deadstart ecjstpmsat leconfisaatioa, program 

; ,/'-E5B Deadstart res^stttariem program, se§SMi^^ 

- jgp Deadstart RMS drive* centiti .program — in PP2 

5CP Dwdsiart 66034 driver 

. 5CQ Deadstaar* 6633 dare* 

, 5CS Deadstasi 854 driver -'.."■' 

. 5Ct Deadstait 660341 driver . - 

5CV " Deadstait 821 drive* 

5CW ' Deadstait 841 driver 

5CY - • Deadstart 844 disk subsystem driver 

p Prp*ddress 660341 program •> _ 

'. OSY 844 Buffer contjobms - 

OMT MTS controlware 

• SIX. Deadstart system initiatian program (PP resident) 
-'- ircp Deadstait mala cental processor ; program 

• MTR System mamtor program - 
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DSD Display control program 

library name table 

Directory { PP name table . 

?Ppro§ran»-lb« &a«»BJ be siade processor's segownt 

Esay pcioi tabic 
Eaienaal xefesssee list 

System ) External refersaes table 

libsaiic* ' | Progjamawabtttable 
Program roarae table 
CP/?Prouisses 
Ai^ mStaBaiSm rsacj expand the above records la two ways: 
, ' ■■«." • ♦ ir - r* Th- afl ««tics. Tbf deadstart diagnostic sequencer, CES, will be placed afier CEA, 

2. By pbd=g up to «™. addi&mJ CMR ««* •» ■>» ^'™ ^^ foT diS ' ,!r =' 'W 00 ' . 
configuration. ... 
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STUDY QUESTIONS 
Deadstart - Section XII 

1- Pushing the deadstart button causes PPs to 



2- The first program executed in the deadstart sequence always comes 
from ..,.,..-.■ . ... .... . . . ■- . ;. . , . 

3- The matrix switches on the deadstart pannel are for . 



4. The deadstart software begins execution at location 



5« The deadstart software normally is read from 



b« The name of the first software sequence to be executed is 



7. The CAR tables are initialized from code found . . . _ .. . . ■ 

§• Deadstart routines may not be modified- 

•Ca> true 

{b> false --■:) 

=1. Where may a listing of the deadstart software be made? 



10. How many PP-tsJ are required for deadstarting? 

11- Are there more than one kind of deadstart? 

■CaJ yes 
•Cb> no 

12- Is any peripheral equipment-! other than a tape drivei required for 
deadstart? 

-CaJ yes - Explain ...... .... , i :i .... .. . ; ^ ., . ...... ...... 

■Cb> no - Explain ... ....... -, , ... ■ ... ...-..■..-.■ ' 

13* Deadstarting normally requires operator intervention. Why? 

14. Does deadstart have an effect on the permanent files of a 

SCOPE System? Explain ... .... ...... ... .--....- - ■ * , J 

15. How is a deadstart tape prepared? _^_ ---— _ -w- _ — ____« ■ 
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STUDY QUESTIONS 
Deadstart - Section XII 



1- Pushing the deadstart button causes PPs to <3e P<g.s>e/T~ 

2- The first program executed in the deadstart sequence always comes 
from rn<3u4vTx Su> iToU^J (j PPo^ 

3- The matrix switches on the deadstart pannel are for ^eJ^CTSvig* 
H» The deadstart software begins execution at location iS ocs\-aA 



5- The deadstart software normally is read from 



~r&f* 



b> The name of the first software sequence to be executed is 6£4 



i) 



?• The CfIR tables are initialized from code found 0H 

a- Deadstart routines may not be modified- 

-Ca> true 
^JbJ) false 

T- Where may a listing of the deadstart software be made? 

ID- How many PP<Cs3- are required for deadstarting? £U„ 

11- Are there more than one kind of deadstart? 

<fa£) yes 
-Cb> no 

12- Is any peripheral equipment-* other than a tape driven required for 
deadstart? J f^ I f~ / 

(Tjg) yes - Explain Q olhskr +;!& ^ ^JlLS^l 
■CbJ no- - Explain . ....... ■--'. -.. . ■ 

13- Deadstarting normally requires operator intervention- Why? 

m- Does deadstart have an effect on the permanent files of a / 

SCOPE System? Explain M*g^ — a** u^e /'7Va/ us l// i*)P*- t4<^ *-^u 
IS- How is a deadstart tape prepared? us <j2£i BDT7T£-~z£ 
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RELOCATABLE OVERLAY 
Lesson Guide 

REFERENCES: 

PP COI1PASS Student Guide Section XIII 

TRAINING AIDS: 

Visuals VALS-S3-13-3-I VALS-S3-13-5-. VALS-S3-13-b 

ASSIGNMENTS: 

Study Questions Section XIII 

OBJECTIVES: 

£13- To present the techniques and requirements for using 
relocatable PP code* 

-C2> To present enough details of PP program re-location for 
the student to be able to follow some system routines 
which use the re-location techniques- 



■-..J 



J 
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RELOCATABLE OVERLAYS 
Lesson Outline 



XIII- RELOCATABLE OVERLAYS 



Concepts of Relocation 

o Identified by SEGMENT 

o Assembled with any ORG 

o flay be loaded anywhere in PP 

o Must be adjusted for different loading points 

Relocation Tables 

o List of address to relocate 

o Generated by MACROS 

o Example 

Flow Chart of Relocating Process 

o Must be performed by PP programmer 

o May use PP Res routines also 

Relocation using ORG as part of Relocation bias. 
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2fl<V? FNTPY 
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FMTPY AND fXIT POINTS 
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STUDY QUESTIONS 
Relocatable Overlays - Section XIII 

!• Relocatable Overlays are absolute PP programs* 
•CaJ true 
-CbJ false 

2- How are relocatable overlays named? 

3- Where are relocatable overlays stored? 

H* How are relocatable overlays loaded? 

S» The PP resident routines R-OVL may be used to load a relocatable 
Overlay- -CaJ true 
-Cb} false 
fa« Relocatable overlays are generally used because ...'.. 



7« A relocation table is 



fl» Using relocatable code generally requires more programming than J 
performing the same function with transient programs or primary 
overlays- 

-Ca> true - explain . . 

-Cb> false - explain • . . . .. . . . ; 

I- MACROS may be used in relocatable code to ^ ^ • 



10. uhy does the programmer have to play "loader"? 
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STUDY QUESTIONS 
Relocatable Overlays - Section XIII 

) 1. Relocatable Overlays are absolute PP programs- 
(ia>) true 
-£b> false . 

2. How are relocatable overlays named? J 4 ""^ i« *■«_ &*-"\ fP P r*>^<L* 

3« Where are relocatable overlays stored? CA4, D^S^i ^O* 

t*. How are relocatable overlays loaded? &J'*m &0i/<- <xj «***/& 

S» The PP resident routines R-OVL may be used to load a relocatable 
Overlay- CjS^ true 
-Cb> falsa 
b« Relocatable overlays are generally used because *£h&&j &**£-,: 

?. A relocates- table is a 'w/<e- *T &d<*"*3S<*s c^ L^ r 

? S- Using relocatable code generally requires more programming than 
performing the same function with transient programs or primary 
overlays. j . , 

^Ca>/ true - explain t^e^tocQ'r^^r g <><*■& J4-&*z.cr&<2/ 

• -Cbl ' false - explain . . . .. . . . - ... - . . ... . , ".;.. 

1r MACROS may be used in relocatable code to .B4S<A.t /.** J r &'/oc4T* P t * 
ID. tjhy does the programmer have to play "loader"? 
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SAMPLE PP PROGRAMS 



14-0 



SAMPLE PP PROGRAMS 
Lesson Guide 

REFERENCES: 

PP COMPASS Student Guide Section XIV 

TRAINING AIDS: 

Visuals VALS-53-m-3i VALS-53-14-b-> VALS-53-m-T 
VALS-S3-m-lSi VALS-S3-m-ia 

ASSIGNMENTS: 

Review all sample programs in the Section Text 



OBJECTIVES: 



-C13- To illustrate by example the usual methods of 
program structure* 

•£5> To illustrate by example the methods of PP 
programmer message transmission to dayfile* 

-C31 To illustrate by example error messages issued 
by system. 

-CO To introduce the PP programmer to a PP dump* 

■CSJ To introduce the PP program - 1RN 
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SAMPLE PP PROGRAMS 
Lesson Outline 



XIV- 



LE PP 


PROGRAMS 


A- 


Sum to numbers from CM 







Structure 







Symbols 







Comments 







Calling CP program 







Linkage 







Dayfile 


B- 


Error Detection/Processing 







Test 







Detect 







Issue Message 







Exit 







Auto Recall Error 







PP Call Error 







Hung in Auto Recall 







Hang PP 







Hang PP -Cdump} 


C 


Assembly Error-CsJ 


3>. 


Actual SCOPE PP Code - 1RN 







Structure 







Documentation 







System Symbols 







MACROS 







Detail Code 







Assembly Errors 







XREF List 
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SbM.C.PPFHA 



COMPASS - VER 2. 



02/1//72 18.05.05. 



PACE 



fcH 



1000 
1000 

ICC 

:uc5 

lu Oo 

1013 
1011 
1C12 
1614. 
Iiil5 
1G17 
1021 
1023 
1C25 

iczr 

1030 

:cii 

1032 
1033 
1035 

1036 

ia«.i 

10".2 
11)1.3 

12*. <♦ 
13<.5 

131.7 
1050 
1051 
1352 

1CE<» 
1056 

iota 

1H2 

uej 

10fc5 
1077 
11C5 



( ?? pfib&RRry 



307<t 




3'j7i» 




6050 




1*.U2 




3 '.02 




305<» 




1601 




C203 


0505 


0603 




010C 


1C56 


6122 


1065 


5000 


1076 


550C 


1071 


D2j3 


0U6 


UQ1 




3^01 




3U5*. 




16&3 




020U 


0505 


0721 




6301 


1065 


1<.J0 




e:ic 






UQ1 




3UU 




305<. 




32C-0 


0505 


707 




6210 




U12 




O2C0 


0516 


31CU 


0103 


2 COO 


1077 


02U0 


0671 


mu 




01C0 


1052 



5502 



IOSNT SUH r C.PPFWA 

» THIS IS A PP PGM TO SUM 2 "NUMBERS FROM CP mThORY 

ii is a test to show the linkage ano hoh to put it in the system 
the pp pgm is entereo from ovl by a ljm 
it is a tr a nsient pr ogram and mill rum at 1000 
pTrTPh ""•" 



I 



EXIT 



AST 



BUF 
AOTHSG 



ssr 

ORG 

PPENTRY 

LOO 



;«02 



CRO 
LOU 
STO 
LOO 
AON 
RJH 
PJM 
LJrt 
CRM 
LOU 
RAH 
RJH 
LON 

STO 
LOO 
AON 
RJH 
MJN 
CUM 
I DM 
CRD 
LON 
STO 

LOO 
RJH 

HJN'. 

CUD 

LON 

RJH 

LJM 

LOC 

RJH 

LON 

LJH 

BSS 

OIS 

End 
storage used 

6600 ASSEMBLY 



C.PPFWA 

O.PPIR8.0.TC 

O.PPIR 

O.PPIRB 

2 

2 

Q.PPIR8*«. 

1 

R.TFL 

♦♦3. 

ABT 

BUF, 2 

BUF*9 

BUR**, 

R.RAFL 

1 

1 

O.PPIRB+<» 

3 

R.TFL 

ABT 

0UF,1 



O.TO 

1 

D.TOf* 

O.PPIRB+<» 
R.TFL 

ABT 

O.TO 

M.DPP 

R.HTR 

R.IOLE 

ABTMSG 

R.OFH 

H. ABORT 

EXIT 

10 

,♦ BAD AOOR* 



* TlTtts?ehsler its pp 

♦ GET ACCESS TO SYSTEM SYMBOLS 



♦ HILL RUN AT 1Q0O 



GET CH AOOR OF INPUT REGISTER 
GET PARAC. WCRO FROM CH 
FOR 2 MORE CM WORDS 

GET CM AOOR OF BUF-1 
REL ADOR OF BUF IN A 
ABSOLUTIZE IT 
HJN WCNT REACH A&T 

READ TWO DATA HOROS 
GET DATA FROM OUFU 
ADO OATA FROM BUF 
GO SEE IF MOVE PENDING 
TO HRITE ONE WORD 

GET ADOR TO SENO ANS BACK 
REL AOOR OF ANS 
GO ABSOLUTIZE IT 

HRITE ANSWER BACK 
ZERO OUTPUT BUFFER 



-T. 



C 

r 



n 
: l 
! In 

, LU 

; I 

-C 

I 

UJ 



* SET COMPLETE BIT 



♦ ABSOLUTIZE PSEUOO FET AOOR 



PUT FET WORD BACK 

GET DROP ME CODE 

GO DROP PP 

GO TO IDLE LOOP 

ABORT MESSAGE AC OR + FLAG 

ISSUE OAYFILE MESSAGE 

ABORT OUT OF RANGE 



♦ BUFFER FOR CH HOfcC'S 



51 STATEMENTS 
0.750 .SECONDS 



712 SYK:,:U' 
30 RErlnl'H. 



^ 



\ 



o 



/rs 



c 
o 

o 

o 



-VTsrxvr 



AHT 
BUF- 



C.^FFWA 

-d;tt 

EXIT 

-Ti.7\nn7?.T 



R.TFL 



'.MITT 



.--o- 



'•sxi-rrrrprnTV 



S Y t ■' ri . T L T ^ r> p.- ir c p r ^ (• r j A i'j i, r 



nantn^u 



"TnnrrTr?T~ 
osoirro 

"tTin"T r .7^"" 



oonicsn 

"TTfTTGrT 



nnnof?:* 



SCPIOT 



SO" 3 TXT 



j *,! J I r. * i 



-rcFTnnr 

S^PTFXT 



:°r 



7PT 



XT 



SCPTFXT 



001013, 

-TQY0T<rr 

P 1 n 7 1 , 



wrmT 
onions 



"TFOT05TT 

n ~ i. ~> •♦ t 
■wmsr 
on in 50 



I. 



ranrauy 

nnioio, 






001033, 

"WTfflTT 

f ) U 



qo i n t+5 

Trirro'zrr 



TG'lffvI , 



0C3OZ7_, 
TT0 J"ff«T& 



onro3t) 



o o i o <j ? 



fliii02T~ 
001011, 



001043 



t 






Q 

O 

o 
© 

o 

o 



(^Uo pact,Q-> -m ILhi^u) ctA^J .oxl>J2Ju2>ij Jaxuu) 






vl'/w- 



.SQ,PTv XXL „/U>4^L_Ai.VCX^„ 



jfcpJUUcSl „Ib>^v>i-L^VL„Q&Y^ 



<_ 



&^jyn^_&|_£?_^£-^ 



- — TIME LOAT l-m? --L1--L? TYPF -- -USIf ---«•♦ CALL 



Tjfffi tOAHcF P5 f «3H PWft TAJU'S 05*4274 
- P'-' CGP AM /. na'? " 1 S- 

IPiTTPT 



--LA-n^LF.n COH M ON-- 



7>irc,nT 
cpf 



BLOCK 



nonioo 



omn 



\J~ 



K J 



PRCB3 


\C.9 PR&GRftM/ 
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COMPASS - VER 2. 


02/17/72 10.05, 






* 


IDENT 
ENTRY 


PR0B3 
TESTIT 







5110000001 


TESTIT 


SA1 


1 


» CK RA+i FOR EMPTY 




0311000000 + 




NZ 


XI, TESTIT 




1 


5110000004 C 


j 


SA1 


PARAM 


* PUT PARAM IN RA+i 




10611 


i 


BX6 


Xi 




2 


5150009001 




W t% \* 


4 

J. 


r, ;' 


3 


5113000001 


LOOP 


SA1 


1 


* HAIJ TILL PICKED UP 




0311000003 + 




NZ 


XI, LOOP 




i* 


UIOOUOOOOO X 




E.NDRUN 
USE 


/BLOCK/ 









FAKEFET 


BSSZ 


1 


* PSEUOO FET TO HOLD COMPLETE BIT 


1 


OOOOOOOC000000000173 


BUF 


DATA 


123, 456 




3 




ANS 


BSSZ 


1 




<♦ 


2325152000000000000O C 


PARAM 


VFO 


18/3LSUM,3/2,3/0,36/FAKEFET 


! 6 






END 


TESTIT 




.fc- 1 ! 


<*3<»06 


STORAGE 


USED 


18 


STATEMENTS 7 SYMBOLS • 


i i 

in ! 




6600 ASS 


ISMBLY 


0.2<*0 


SECONDS 12 REFERENCES 




^OUTPUT J 


-. 


■• • ■ 




RELATIVE DMPU00,iQ5> 
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\ 


001C0 


00000 O0QO0 00000 00001 


00000 00000 00000 


00173 


00000 


00000 00000 00710 


00000 00000 00000 


OLIO** 


23251 52000 COOOO 001QQ 


51100 00001 03110 


00105 
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ft*H\ 



^akeFetT 
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Ff\V<tfET 
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fculr 
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H5i> 


&NS 


579 



a W63 S 
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P Qk.ccvwDa>^> Jis*-. P P P-hd Vuxw— 
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i i 
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i kr 1 
I 

cr 



2>.Y0 






3).PPiRB 
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0: 






I 




fwefet 



'Bor-vo 
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. i 
1 
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.'? 






. .-/ 


■ . ..• 1 
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■ . .-"I 


< J < 


....... .•.■H*' 




i : 


. '••5.,; 1 




1 |.l 







r 
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Q 
O 









v 



v 

o 



b-' 

-C 

I 

-vl 



18 

ie 

18 
18 
15 

15 
18 

18 
18 
i8 
l'i 
13 
15 
13 
15 
18 
13 
18 

J. 9 

* r> 
•X. J 

ji3 
■19 

;is 

'13 
15 
15 
13, 
IS, 
13 
15 



1(7 
Off 

G<+ 

05 

C5 

05 

05 

5 

C5 
05 
5 
05 
C5 
05 
C5 
05 
05 
15 
5 
05 
C5 
C5 
05 
05 

•j ? 
05 
C5 
05 
05 
05 



\ „•' . V...»' 

17/72 NHL SCOPE 3.3 LEVEL 250 06/29/71 
55.JO63 00 8 
55.JOB,CM7OO0O,T3O. 
02. tNTL, 77777. 
O^.GO. 

Qt» .COMPASS (B=PPTEST, S=SCPTEXTJ 
05. MINIMUM FIELD LENGTH NEEDED = Q5'>300 
05. ASSEM3LY COMPLETE. 

Q5.REWIND(PPTEST> 
Q5.EOITLIB. 

READY (SYSTEM) 

ADD<* V PPTEST) 

COMPLETE. 



u 




07. 
08. 

ca, 

**2.GO. 

'♦5. COMPASS. 

hb. MINIMUM FIELD LENGTH NEEDED = QU5G0 

(»6. ASSEMBLY COMPLETE. 

t»6.LG0. 

>*>7.CPA 51.56<t CP8 

< t 7.PP 007.63'* IO 

.'!7.D k fP(100,105) 

«t7.RFL,7O00O- 
t k 5.CPA 051.570 CPB 
it3.PP 008.033 IO 

^5. E3ITLID (RESTORE) 
5 2. GO. 

STumAGE 

0.005 
C10. 311 
OilO. 955 



000.005 
0'JQ.76<t 



000.005 
0C0.764 



NEW FL 0Q5D0 



NEW FL 70000 



'.'•5 * frASS 
SJ5.CPA 
i>3.C?3 
55. PP 
55.10 



000310 

SEC, 

SEC. 

SEC. 

SEC, 



PRU 



O 

o 
o 






£>i 



__. Cc-ft-M. <A ( ^Xh- <& cXsuck/ 



swEHrN»CM*oof>n«T7777»Pii *£ ^PTE^T 

C0MPASS(B = ^PTt5T.5-SCPT£X7) *"" = '— — 

RPW1M0C°PTEST) 

EPITLI^. " PUT- IT TN SYSTEM AWfT-MAKtf NEW "CM R 

COMPASS. ASSEMBLE CP POM TO TRY IT OUT 

" LGO. •' " " ; : ~"~" "*~ 

OMP.C 100*1 OS) 

... _ — 0MP> ._. - • — ^ — ' ■ ' : ■ — ^ — ! — -— ~- - 

DMP(lO0--*00) 

— - — ediTlih (Restore 1 r ~*~ ' : : 

EXIT. 

• -OMPUO0-10S) -— ■ — - — ' ' ~~~ " ' ^ ! ' ' : 

W P(100.400) ■ ' 

-7 - ED ITLI9(PEST0PE)- — ' ' * '~*~- 

? — » I DENT SUbWC.PPFWA 

^ - -» THIS IS A PP- PGM "TO" SU?-' 2 NUMBERS" FRO.'. CPMEMOPl — -— ' — —-— 

* IT IS A TEST TO* SHOrf ThE LINKAGE .\\'D r!Q* TO PUT IT IN THE SYSTEM 
— o THE PP PGM" I? lNTEPED'FKQM OVL BY A "L^M .__ _ 

* IT IS A TRANSIENT PROGRAM A-NO WlLl. RUi-J AT 1UO0 



PER1PH ,-■——-_- -£ LL - ASSEMBLER 'ITS-PP- 



SST * OET ACCESS TO SYSTEM SYMBOLS 

— ftASE ~^r — ! — -*-MOST-f.p PGMS AR£"OCTAL — ' — ~ — ' — 

ORG C.PPFWA • WILL f'JN AT IfloO 



ftJM - " ' R ."PAUSE " " "" ' 

LDO O.PPIR * GET Cm ADD* OF 1N»UT REGISTER 
CRD ' — — D-iPPIRfr *~GrT - P* RAM WORD FRum CM ! 



/rtV- LON 2 * FOR 2 MORE CM WORDS 

*_' ' ' 



MJN A8T 

; * — CWQ . rTQ »_..p nT _ Ft . :T _ w0>Jt) _ QA . CK ._. _ — k 

LDN M.OPP * OFT DROP •*£. COqE 
£XIT PJM R.-MTR — S"G0 "OKOP PH " r : ; — 

LJM P.IOLE * Go TO IDLE LOOP 
~'A8T — LON t-UABORT *7A~0*RF "IF AOO.R OUT "OF-RANGE 

LJM EXIT 
BUF— ' PSS —\Z "~- — J ~'- ^ ■ 

? 



<\ 



READY i SYSTEMT 



ADOt^vPPT^ST) 
7- COMPLETE. 

% IOENT PR083 

<\ __ FNTHY TESTIT — 



TESTIT SA1 1 » Ck RA-1 FO« EMPTY 

w _ x 1vTl ._ tit ._._ : — _ _ , „____ _, 

SA1 PaRAM * P..= T PARAS IM RA + i 

SA6 1 • 

loop sai F --i o-w.vTt"""i_:l s"-ic*td"up '■"- *— — 

NZ XI. LOO» 

W" ,,c ^ . /rlLOCK/ 

FAKH'KT -SSZ • I" '-•■* (-"thUfu f'cJ J "> MCLu complete m r— 

PUf OAT A 123,*S-* 

fi'js pss/ i — ■■■- ■ - ■ --—----■ ---- - 

fc papam vrn 1 '1/3 1. '..'.;•-. • 3/2^/v , ■*.?/»• ;,■•;?.* ». ; 

I_ rwn - TEsrti 



^. 






m-a 



SUH t C.PPFWA 



COMPASS - VER Z, 



02/17/72 1«.12.*,8. 



PACE 



I 



ltttlO 
1000 
100 1* 

13C5 
IOCS 
1U07 

itfio 

1011 

1012 

lCl<t 
1216 
1017 
1021 
102J 
IJ25 
1027 
1UJ1 
1032 
U33 
1C3<. 
1 u J? 
1037 
10*. y 
1D«.2 

iC«. <♦ 
li<.5 
13sb 
10<.7 
1G51 
13&2 
1353 

U56 

1J:.0 

« *, * ? 

*•«•■■» 

10fc<. 
1G&5 
1C&? 

tic?. 

UC7 



307«. 




3Q7L 




6C50 




1<*02 




3V02 




3C5*. 




1601 




2110 


0000 


0200 


0505 


0603 




010G 


1060 


6102 


1067 


5030 


1100 


5530 


1073 


023C 


0<t<<6 


noi 




3<,Ci 




3:s«. 




16C3 




02uo 


o&0» 


0721 




63U 


1067 


noo 




6&10 




i<.oi 




3<.u 




3G5<» 




0200 


0S05 


C707 




6210 




1'.12 




02U0 


0516 


0100 


0103 




1101 


C200 


C671 


1V13 




oioo 


1054 


KB1-> 





I DENT SUM.C.PPFWA 

• THIS IS A PP PCH TO SUM 2 NUMBERS FROM CP MEMORY 

♦ If IS A TEST TO SHOH THE LINKAGE ANO HOW TO PUT IT IN THE SYSTEM 

* THE PP PGM IS ENTEREO FROM OVL 8Y A LJM 

* IT IS A TRANSIENT PROGRAM ANO HILL RUN AT 1000 

♦ TELL ASSEMBLER ITS PP 

• GET ACCESS TO SYSTEM SYMBOLS 
» HILL RUN AT 11100 

• t.fT CM AOn» OF INPUT REGISTEP. 

• GET PARAH WORD FROM CM 
» FOR 2- MORE CM WORDS 

• GET CM AOOR OF BUF-1 
» REL AOOR OF BUF IN A 



EXIT 
ADT 



BUF 
A3TMS0 



PERIPH 




SST 




ORG 


C.PPFHA 


PPENTRY 


O.PPIRB.D.TO 


LDO 


O^PPIR 


CRD 


O.PPIR8 


LDN 


2 


STO 


2 


LOO 


O.PPIRB*»> 


ADN 


1 



ADC 



5^.202 



RJM 
PJN 
LJM 
CRH 
LOM 
RAM 
RJM 
LOU 
STO 

LOO 
AON 
RJM 
HJN 
CWM 
LOW 
CRO 
LDN 
STO 
LOO 
RJM 
MJN 
CWO 
LDN 
RJM 
LJM 
• LDC 
RJM 
LDN 
LJM 
OSS 
CIS 
£ NO 
STORAGE USED 
6*00 ASSEMBLY 



100000B 



GENERATE BAD ADDRESS 



R.TFL 

» + 3 

AOT 

BUF, 2 

BUF*9 

OUF + 4 

R.RAFL 

1 

1 

O.PPIRB*<» 

3 

R.TFL 

ADT 

BUF, I 



O.T0 

1 

O.T3*<» 

O.PPIRB*<» 

R.TFL 

AOT 

O.T0 

M.DPP 

R.MR 

R.IOLE 

ABTMSG 

R.OFM 

M. ABORT 

EXIT 

10 



* ABSOLUTIZE IT 

♦ MJN WONT REACH AOT 

• READ TWO DATA WOROS 

♦ GET DATA FROM OUF*l 

♦ ADO OATA FROM OUF 

* GO SEE IF MOVE PEUOING 

* TO WRITE ONE WORD 

• GET AOOR TO SEND ANS BACK 

* REL AOOR OF ANS 

* GO ABSOLUTIZE IT 

♦ WRITE ANSWER BACK 

• 2ERO OUTPUT BUFFER 



* SET COMPLETE BIT 

* ABSOLUTIZE P?FUOO FET AODR 

* PUT FET WORD BACK 
•GET DROP ME CODE 
$ GO DROP PP 

* GO TO IDLE LOOP 

* ABORT MESSAGE AOOR + ri AC '., 

* ISSUE OAYFILfe" ME S :>,', CE 

* ABORT OUT Ci RAKG? 



m 
~-{ 



3> 


r- 


n 


I 


in 


LU 


bH 


-c ■ 


1 


-Q I 



* SUFFER FOR CM VO-:Ji 



5*. STATEMENTS 
0,73^ SECONDS 



"^ 



^ 



.^ 



O 
O 






o 



G , 

I 



G 












o 



02/17/ 

18 .12.^1 

i8.i2.ta 

16.12.^7 
18.l2.<f7 
18.12.<»9 
18.12.t«9 
18.12.<»9 
18.12.<*9 

18.12.58 
18.12.59 
18.12.59 
18.13.10 
18.13.2(1 
18.13.21 
13.13.21 
18.13.21 

18. 13.22 
18. 13.22 
18.13.22 
16.13*22 
13.22 
13.23 
13 .13.23 
13.13.23 
18.13.23 
18.13..23 
13. 13. 2 P. 
13.13.31 
18,13.31 

13.13.31 
18.13.31 
18.13.31 



18. 

18. 



72 NHL SCOPE 3.3 LEVEL 250 06/29/71 

.SKEHY1H 

.SHEHYN,CM7O0QO. 

.GO. 

.COMPASS (8=PPTEST,S=SCPTEXT> 

. MINIMUM FIELD LENGTH NEEDED * 05<*300 

. ASSEMBLY COMPLETE. 

.REWIND(PPTEST) 

.EDITLIB. 

READY(SYSTEM) 

ADD(»,PPTEST) 

COMPLETE. 
.GO. 

.COMPASS. 

. MINIMUM FIELD LENGTH NEEDED = 0t»350D . 
. ASSEMBLY COMPLETE. 
.LGO. 

.CPA 050.592 CP8 001.258 

.PP 009.618 10 000.766 NEW FL 00500 

. BAD ADDR*{ 

.EXIT. 

.DH?(10fl|105) 

.OHP{100,'+G0> 

.RFL,70OUO. ' 

.CPA D 50. 595 CP8 

.PP 011.092 10 

.EDITLIB RESTORE) 

.GO, 

.MASS STORAGE 000310 

.CPA 050.958 SEC, 

.CP3 U01.25S SEC. 
.PP 013.^65 SEC. 
.10 000.957 SEC. 






u-<ujujuJi fijvO^vu noot$uu>v> 



0C1.258 
000.766 



PRU 



NEW FL 70000 






v. 



)) 



PR033 



COHPASS - VER 2. 



02/17/72 16.33.19. 



PACE 



5110000001 TESTIT 

0311000000 ♦ 

1 5110000001. C 

10611 

2 5160000001 

3 511000C001 LOOP ' 

0311000003 ♦ i 
k ClOQOOJtiQO X 



IDENT 

ENTRY 

SA1 

NZ 

SA1 

BX6 

SA6 

SAl 

NZ 

EHORUN 

USE 



oooaooooojoocGouoooi 



FAKEFET QATA 



1 00000003030000000173 OUF DATA 
J ANS BSSZ 

i* 232515ZOOO0OCCQOQOOO C PARAH VFO 
6 END 

i»3V06 STORAGE USEO 
6600 ASSEMOLY 



PR0B3 

TEStIT 

1 

XI, TESTIT 

PARAH 

XI 

1 

1 

XI, LOOP 

/BLOCK/ 

1 



• CK RAU FOR EMPTY 

• POT PARAH IN RA*1 

• WAIT TILL PICKED UP 



» FAKEFET SHOULD .CONTAIN ZERO 
» OR MTR HILL REJECT CALL 
♦ WITH AUTO RECALL ERR KSG 



12-3, <*56 

1 

ld/3LSUH,3/2,3/0|36/FAKEF£T 

TESTIT 

22 STATEMENTS 7 SYMBOLS 
0.252 SECONDS 12 REFERENCES 



ID 
C 
■A 
O 



P 

rri 
P 

r 
v 



1H 

-C 



j— i 



m 

:p 

a 



G 

O 

o 



o 



^ 



o 



I 

ru 



Q 



02/i 

18. 32 
IS. 32 
10.32 
1C.32 

ie.32 

■16.32 

18.32 
16.32 

.U.32 
1ft. 32 
IB. 32 
1C.33 

ig.o? 

1--.3 3 
if J. 3 3 
It- .33 

,ltv. 33 

1 1ft. 3:5 
< f 1 "? 

J. u » ^ J 

10,33 
i 13.33 
If.. 3 3 
10.3-1 
18.32 
16.33 
18.33 
Hi. 33 
113,33 
10.33 
18.33 
18.33 



7/72 + N W L SCOPE 3.3 LEVEL 250 06/29/71 

53.SHEHY1T 

53.SHEHYN,CM7 00 00. 

54. GO, 
54.C0HPASS(8=PPTEST,S=SCPTEXT> 

55. HTNIMUM FIELO LENGTH NEEDED = 054.300 
55 < ASSEMBLY COMPLETE. 

Sb.REWIUDfPPTEST) 

5S.£DITLIQ. 

^7. READY(SYSTEM) 

58. ADO<*,PPTEST) 

53. COMPLETE. 

16. GO. 

19. COMPASS. 

20. MINIMUM FIELD LENGTH NEEDED = 0V35UC1 ■ 

20, ASSEMBLY COMPLETE. 

2Q.LGO. 

21. CPA 051*243 CPB 03C.C0C 

Sl.i'P 006.274 10 000.765 NEK PL flCSDD- 

21.AUTO-RF.CALL ERROR 



A^.S : S--'. •Tvt?--..'^-:.:.!?- 



i.r.;;lf . 
01".? ( i 

DMP ( 1 

RFL,7 

CPA 

PP . 

EOITL 

GO. 

MASS 

CPA 

P? ' 

IO 



21. 
22 . 
22. 
22. 
22. 
22. 
25. 
27. 
27. 
27. 
27. 



D0»105> 

00 1 400) 

0000. 
031.246 CPB 
007.496 10 

IB (RESTORE) 



<J~Ci 2 XJ^'1 ■'■•■■ .V- v . 



••I 



I 

OtJQ.000 
0.765 



NEW FL 70000 



STORAGE 000310 PRU 
1151.624 SEC. 
009.769 SEC. 
000.956 SEC'. 



stp. 



© 



o 



© 



c 


» 


•J . . * 


.....*.* 


/■ 


>--...- 










PRQd3 


" 




IOENT 
ENTRY 


PRO«53 
TESTIT 


C 


siioaoonri 


TESTIT 


SA1 


1 




osiioaooco * 




NZ 


XI, TESTIT 


1 


suoooooc. c 




SA1 


PARSM 




10611 




0X6 


XI 


2 


5160l)OOCri 




SA6 


1 


3 


SiUuuoooi 


LOOP 


SAt 


1 




U311000003 ♦ 




NZ 


XI ,L0 OP 


t. 


OiOOCQDOOO X 


i 


F NO RUN 
USE 


/BLOCK/ 







rAKEFET 


BSSZ 


1 


1 


8000COOCCOC30000ei73 


flUF 


DATA 


12.J,<*i>6 


3 




ANS 


USSZ 


1 



I 
UJ 



ENO 
«,3<»06 STORAGE USEO 
660 ASSEMBLY 



COMPASS - VER 2. 02/17/7* 16. 37. 37. 

♦ CK RAft FOR EMPTY 

♦ PUT PARAM IN RA+1 

♦ MAIT TILL PICKEO UP 

♦ PSEUOQ FET TO HQLO COMPLETE BIT 



PAGt 



13/3 LSUH, 3/2, 3/0, 36/FAKfcF£T + 10iJ0ap3 

"» &AQ ADDR TITFAinra W tLL CAUSE 



€UJ X o^Kfl^v^ 



♦ MTR TO REJECT CALL 

♦ WITH PP CALL ERROR MSG 



TESTIT 

23 STATEMENTS 
0.267 SECONDS 



7 SYMBOLS 
12 ».£F£PENCES 






P 

3? 

r 



m 

o 



G2/17V72 t NHL SCOPE 3.3 LEVEL 250 06/29/71 
18.35. 14. SKSHY1W 

18.35. i 4.shehyn,cm7 0000. 

18,35. 18. GO. 

1.1.35.18. COMPASS <B = PPTEST , S-SCPTEXT) 

15.35.19. MlhlKUM FIELD LENGTH NEEQFD = 054300 

13.35.19. ASSEMBLY COMPLETE. 

10.35. 19. RES'INO(PPTEST) 

13.35.19.EQITLIB. 



I 



REAOY(SYSTFMJ 
'ADDt»»PPTEST) 
COMPLETE. 



ia.35.51. 

1&.35.5S. 

18.35.C2. 

1?.. 37. 3 3. GO. 

18. 37.3c. COMPASS. 

18.37.37. MINIMUM FIELO LENGTH NEEDEO = 043509 

18,37.37. ASSEMBLY COMPLETE. 

|13,37, 37.LGO. 



H0.T7.3H.CPfl 052.704 CPB 000.148 
113, 37. 35. PP Q23.4Q7 IO U00.765 

J18.37.T8.PP CALL ERROR «f 

'IS. 37. 38. EXIT. ; 

10,37. 38. QMP<10G,1Q5) 

13.37.39.DMP<100,400) * 

18. 37. 39. RFL t 70uin. 

10.37.40.CPA 052.707 CPB 

i8.37.4C-.PP 024.630 IO 

10. 37. 40. EDI TUB (RESTORE) 

18.37, 57. GO. 

IS. 37. 59. MASS STORAGE U00372 PRU 

13.37.59.CPA 353.307 SEC. 

18.37.59.CP9 000.148 SEC. 

18. 37. 59. PP 030.776 SEC. 

10.37.59.10 000.956 SEC. . 



NEW FL 00500 






000.148 
GOO. 765 



NEW FL 70000 



V 



' J 



SUM.C.PPFWA 



COMPASS - VER 2. 



02/17/72 18.16.15. 



PACE 





icca 

10 00 


3074 






1004 
IOCS 


3Q7'i 
6050 






lot/ 


1402 

3^C2 






laio 


3554 






:**i 


1601 






i:i> 


021m) 


05(*5 




i<;14 


06C3 






1315 


31"0 


1056 




1^57 


6122 


1065 




:«2i 


5lj3 


1076 




102 J 


5500 


1071 




1'j23 


•32:u 


446 




13 2? 


1«.01 






1033 


3X01 






1531 


3054 




tr 1 


1032 


lb03 




j: 


<H» 


C2.5 6 


0505 


1 

fc- 1 
tn 


IJ35 

lu^n 


. 0721 
1 6301 


ir.65 




r.a^- 


■ uoc 






1041 


6C1U 






1042 


1401 





IOENT SUM.C.PPFWA 

♦ THIS IS A PP PGM TO SUM 2 NUMBERS FROM CP MEMORY 

♦ IT IS A TEST TO SHOW THE LINKAGE AND HOH TO PUT IT IN THE SYSTEM 

♦ THE PP PGM IS ENTERED FROM OVL BY A LJM 

♦ IT IS A TRANSIENT PROGRAM AND HILL RUN AT 1000 

PERIPH ♦ TELL ASSEMBLER ITS PP 

♦ GET ACCESS TO SYSTEM SYMBOLS 
WILL RUN AT 100U 

r.er «»« /tf}9« OF IH°'JT REGISTER ' 
GET PARAMWORQ FROM CM~ * "• 
FOR 2 WORE CM WQROS 

GET CM AOOR OF BUF-1 
P.EL AOOR OF OUF IN A 
ABSOLUTIZE IT 
MJU WONT REACH ABT 

READ TWO OAT A WORDS 
GET OATA FROM B'JF+i 
ADO DATA FROH 3UF 
GO SEE IF MOVE PENDING 
TO WRITE ONE WORO 

GET AOOR TO SENO ANS BACK 
REL AOOR OF ANS ' 

GO ABSOLUTIZE IT 

WRITE ANSWER BACK 
ZERO OUTPUT BUFFER 



SST 






ORG 


C.PPFWA 


* 


PPENTRY 


O.PPIR3.O.T0 




I rv/\ 


n po i p 


* 


CRO 


D.PPIRB 


• 


ION 


2 


* 


SIO 


2 




LOO 


O.PPIRBtW. 


* 


AON 


1 


♦ 


RJM 


R.TFL 


♦ 


PJN 


»+3 


* 


LJM 


ABT 




CRM 


BUF.2 


* 


LOM 


BUr+9 


* 


RAM 


BUF+4 


♦ 


RJM 


R.RAFL 


* 


LON 


1 


♦ 


STO 


1 




LOO 


O.PPIRB+4 


• 


AON 


3 


» 


RJM 


R.TFL 


* 


HJN 


AOT 




CUM 


BUF.l 


» 


LO.N 


• . 


♦ 


CRO 


O.T0 




LON 


1 





•c 
> 

n 

I 

tn . 
W .. 

fcH . 

-c: 
I 

tH 
tn i 



c 
z. 






(71 
P 

;P 

•r 
r 



1043 



3413 



STO 



O.TQ+3 



* SET COMPLETE BIT IH WRONG PLACE 1 , 
» TO HANG IN AUTO RECALL 



■• i : ■'• 



1044 


3054 




LOO 


0.PPIR8+4 


1045 


0200 0505 




RJM 


R.TFL ♦ AOSOLUTIZE PSEUOO FET AOOR 


1047 


07P7 




MJN 


ABT 


i J53 


6210 




CWO 


O.TC ♦ PUT FET WORD BACK 


1'Jfcl 


1412 


. ■ 


LON 


M.DPP * GET DROP ME CODE 


1C52 


• O2C0 0516 


EXIT 


RJM 


R.MTR $ GO DROP PP 


m54 


U1UQ 0103 




LJM 


R.IOLE » GO TO IDLE LOOP 


l2to 


• 2330 1077 


ABT 


LOG 


ABTttSG » ABORT MESSAGE AOOR ♦ FLAG 


iifca 


C2JU 0671. 




RJM 


R.DFM * ISSUE DAYFJLE MESSAGE 


1062 


1413 




LON 


M. ABORT * ABORT OUT OF RANGE 


1063 


0100 1052 




LJM 


EXIT '\ 


1065 


. 


BUF 


ass 


10 ♦ BUFFER FOR CM HOROS 


:j?/ 


!>5C2 


A6TMSG 


OIS 


,' BAD AOOR* 


1105 






£NO 






54202 


STORAGE 


U££Q 


54 STATEMENTS 712 SYHOOLS 






6600 ASSEK3LY 


0.762 SECONDS 35 REFERENCES 



J I 



o 

© 

o 

y 



I 



) 



) 



-^ 



o 

o 
o 



o 

18. 

id. 

18. 

Id. 

18. 
Id. 
18. 
18. 
18. 
Id. 
10. 
18. 
15. 
18. 
18. 

le. 

i *o •* 

18. 
18. 
18. 
5.3, 
18. 
18. 

X ^ • 

13 » 
18. 

10. 
13. 
IS. 
13. 
13, 
18. 
13. 



2/17/ 

16.11 

16,11 
16.1<» 

16. 1<* 
lb. 15 
16.15 
16.15 
16.15 
16.17 
16.17 
16 .18 
16. 30 
16.^0 
16.<*1 
16. M 
lb.<+l 
1 6 « •* 2 
15»<t2 
16. ^3 
i&.<*3 
16. **3 
16. h3 

l6.<*3 
16. 't^ 
16.^5 
15. '.5 

:?..ts 

it.ii cd 
16.25 
18. 22 
18.22 
18.22 



72 NHL SCOPE 3.3 LEVEL 250 06/29/71 
.SHEHY1I 

.SHEHYN,CM7Q000. 

.60. 

•COMPASS (8-PPTEST,S=SCPTEXT) 

. MINIMUM FIELD LENGTH NEEDED « 05*»30Q 

. ASSE;S3LY COMPLETE. 

.REWINO(PPTEST) 

.EDITLIQ. 

READY (SYSTEM) 

A00(*,PPTEST) 

. I/UKI LLI L> 

• GO. 

.COMPASS. 

. MINIMUM FIELD LENGTH NEEDED « 04354)0 • 

. ASSEMBLY COMPLETE. 

.LGO. 

,CPA 051.387 CP8 000.000 

.PP 006.936 10 000.766 NEW FL 00500 

.JOB HUNG IN AUTO-RECALL f 

. AOORESS -J3U1D0 

.EXIT. 

. DMP{100,105) 

.OMP(100,<*00) 
,RF«. r 7J003. 

.CPA 051.390 CPB 000.000 
t Pr uCG.013 10 C00.76& 

,EDITLI3(RESTORE) 
GO. 






MEW FL 7CG00 



.MASS 
• «rA 
.CP3 
.PP 

.10 



STORAGE 
05^.987 
UU0.350 
05^.617 
000.957 



030372 

SEC. 

SEC. 

SEC. 

SEC. 



PRU 



© 

o 



V ■ 
'J* 

SUM.C.PPFHA 






7-^ 



y 



COHPASS - VER 2. 



02/17/72 1^.08.39. 



PAGE 



I 

b- 1 



1330 






1000 


307«. 




103<t 


337«. 




10US 


6150 




100b 


U02 




1037 


31.02 




ItlO 


3151. 




1311 


1601 




1C12 


21U 


0000 


181** 


3230 


0535 


1-J1S 


0605 




1R1? 


UUc 


ies>c 


un 


6102 


1072 


ll> 3 3 


. 5 r 3 


1103 


1B2 5 


5?Co 


1076 


1027 


o?:t 


C4I.6 


1031 


11.01 




10 32 


3U1 




1033 


3 05*. 




IPS'. 


ISO? 




H35 


| 0200 


0505 


1Cj7 


07?: 




lliiO 


6501 


1072 


if. 1.2 


Uuli 




It <*3 


601P 




13<.<. 


1AC1 




i:-.5 


.3«* 1 *. 




lfi<.6 


3US*. 




1CV/ 


C2CC 


0505 


1051 


0707 




1352 


62iC 




1053 


1«.12 




IDS'. 


G2GC 


0516 


IDS 6 


0100 


0103 


1C60 


• ii*06 




lCftl 


Kill* 




1J ! j2 


2100 


110«. 


106*. 


C2GC 


T671 


1366 


0300 




1067 


11.13 




10/3 


OlCO 


105*. 


1372 







IOENT SUM.C.PPFWA 

• THIS IS A PP PCH TO SUM 2 NUMOERS FROM CP MEMORY 

• IT IS A TEST TO SHOW THE LINKAGE AND HOW TC PUT IT IN THE SYSTEM 

• THE'PP PGM IS ENTERED FROM OtfL BY A LJM 

» IT IS A TRANSIENT PROGRAM ANO HILL RUN AT 1000 

PERIPH * 1ELL ASSEMBLER ITS PP 

» GET ACCESS TO SYSTEM SYMBOLS 
MILL RUM AT 1000 

GET CM A03R OF INPUT REGISTER 

GET PAR'.M WORD FROM CM 

FOR 2 MORE, CM WORDS < 

GET CM A03R OF BUF-1 
REL »OOR OF BUF IN A 



EXIT 



A3T 



SSI 




ORG 


C.PPFWA ♦ 


PPENTRY 


O.PPIRA.O.TO 


LuO 


O.PPIR * 


CRO 


O.PPIRB » 


LUN 


2 ♦ 


5TO 


2 


LUO 


O.PPIRB*«» • 


AON 


1 ♦ 



AOC 

RJM 
PJN 
LJM 
CRM 
LOM 
RAH 
RJM 
LON 
STO 
LOO 
AON 
RJM 
itji. 
CWM 
LON 
CRO 
LON 
STO. 
LOO 
RJM 
HJN 
CWQ 
LON 
RJM 
LJM 

LON 
SHN 

ADC 
RJM 



UJN 



BUF 



LUN 
LJM 
OSS 



100Q.UQB 

R.TFL 

•♦3 

AOT 

BUF ,2 

PUP + 9 

BJrfi. 

R.RAFL 

1 

1 

D.PPIRB*i» 

R.TFL 

BUF , 1 

C 

O.T0 

1 

O.TC + t. 

D.PPIR8*4 

R.TFL 

An ■ 

O.TJ 

M.OPP 

R.MTR 

R.UilE 

6 

12 . 

A1TMSG 

R.OFN 



» GENERATE ilAQ A0ORESS 

» absolutize it 

» mjh wont reach abt 

♦ read two uata words 

♦ get data from buf + 1 

♦ aoo data from buf 

♦ go see if move penoing 

♦ to write one word 

♦ get aoor to seno ans back 

♦ r=:l aoor of ahs 
» go absolutize it 

♦ write answer back 

♦ zero output puffer 



* SET COMPLETE BIT 

» AdSOLUTIZE PSEUOO FET ADOR 

» PUT FET W09O BACK 

* GET DROP HE COOE 
$ CO 0"?OP PP 

* CO TO IXE LOOP 

* SET FLAG BITS FOR OFM 

♦ADO HSG A3DRESS 

* I53,UE ChYFILE MESSAGE 



M. ABORT 

EXIT 

1U 



■X. 

o 






1131. 



5355 



ABTMSG OIS 



♦ ABORT OUT OF RANGE 
* BUFFER FOR CM W030S 
,+l OIRTY 8AO KSG* 



3 



j 



1 



CCJC 
33-jC 

c i j a 
0120 
e:<.o 

DUO 

c ;l o 

02 20 
02 v 3 
02i? 
Gi.'fc 

aj.-c 

330 
y3i3 

* ■ I. 

J - '- i 
2 ■_.•!> 
t 3 
i 3 2 

J5'.C 

35 to 

l - i 'j 
oc2u 
oi'.n 

b ' U 
u •' J J 

on; 

C7„r, 

7 50 

tiiio 
1CV0 
1113 
11.- J 

1 ICO 

111. (J 
i?;o 

liiO 

12-. a 

1 5 ' 3 
i?.: 3 
: 3-a 

lMJ 

i-ta 
i ■•.*•. 

1--.3 
1V63 
15C0 
15 20 
15-3 
156 3 
1 6 C 

ltio 

16-0 
IbiO 
171D 
t/iO 
17-3 
' 17 6 If 
HOOD 

20-3 

21 !>0 

2 1 i u 

2123 
21' 

2l3li 

22.3 



Lu^ 



1630 
1217 

S-JC 
6115 
3 -"J 6 
U616 

7777 
1012 
0310 
CtJU 

bcii 

3-13 

- ' 'A 2 

J - 7 1* 

1 ' 1 •'< 
J J/". 

it:: 

l' '. J 

21-0 

3^ 



IV'Jb 

3 b •. * 

C <' t J 

u3ll 
1^12 

3i3- 
5v»o 

*» -» t r. 

2 • 3 a 

lb-.- 

.' ') G 
3iV V 

lOill 

0^3 
6323 
Gt;0 3 
5v2 7 
35-7 
V020 
2130 
11,37 



2235 

oi.22 
1116 
55 J 1 
2<;oO 

an 

3:2 3 

5-,0t; 
31 JU 

3C7I 
2177 

13J6 

5b; 5 
M3J 
■,15a 

to* 



00 05 
JJ62 

10 A 7 

0256 
0331 
1067 
1-13 
G23'J 

C6 71 
10 0b 
OV-6 
0200 
3 3 -.3 
1-03 
2 J 1 -. 
t. 3 1 f 
31vi 

iojl 
3v -'i 
2J32 
i»i *■» 

21 ill 
illi? 
V3j.J 



1372 

laiv 

3352 

ob/i 

2322 

m 

1656 

i^il 

3 .1 5 1 
OiiS 
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JN ADDITION 1RN MAINTAINS A TABLE OF HORO PAIRS TO BE MERGED 
STARTING AT LOCATION «SCRAP». 
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PAIRS. SET EMPCT TO AN ARTIFICIAL 1 
PAIRS TO BE MERGEO. READ CH.RCHN. 
BEGINNING ORDINAL OF THE CHAIN TO BE 

"THISHORO. 'IF THIS" BYTE IS ZERO HE 
SKIP THE MERGE PROCESS ANO CHECK FOR 
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SCRAP TABLE USING EMPCT AS AN INDEX. IF WE HAVE RUN OUT OF 
WORD PAIRS AS INDICATED BY RBTWP BEING 0, ZERO THE ..TH BYTE 
OF CW.RCHN TO TELL SPM WE ARE CONE AND JUMP TO WORK ON THE 
SCRAP HE HAVE IN THE PP. If THERE IS A HORO PAIR READ IIS ' " 
FIRST MORA INTO RBTHP, THUS PUTTING THE POINTER TO TH£ NEXT 
PAIR IN SPHS CHAIN IN RBTHP. ZERO OUT THE SECOND WORO OF THE 
-t^!?;.„J NCREHEWT THE C00NT 0F ENTRIES IN SCRAP BY ADDING ONE 
I2J HP ? T \ CHECK T ° SEE IF THE SCRflf> TABLE FH-LS THE AVAILABLE 
SPACE IN THE PP AND IF NOT LOOP FOR THE NEXT WORD PAIR FROM 

!r H L£ H * IM * : IF SCSAP HAS FILLED ALL SPACE IN THE PP REWRITE 
CW.RCHNWHICH WILL POINT TO THE NEXT PAIR WHICH SHOULD BE 
"HERGEO. 1RN WILL START WITH IT THE NEXT TIHE AROUND. - 

PULL AS MANY HORDPAIRS AS WE CAN OUT OF THE SPH-RELEASE CHAIN 
ICW.RCHN POINTS TO IT) .STORING THEIR ORDINALS AT SCRAP THOR 
777»Q. AS WE RECORD A WORDPAIR WE AERO IT OUT, SO THAT LATER 

^m.SL"^! l HtH lH * 0UT ° F 0RDER - HE PROTECT AGAINST OS REC 
RECOWRY CATCHING-US WITH" ONE" OF -THESE' SCRAPS" POINTTN(riNT<r- 
THE EXISTING EHPTY CHAIN. 
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ZAP THE SCRAP, 
CLEAR SECOND HORO 

LOOP IF STILL ROOM IN PP 



WE NOW HAVE A TABLE IN THE PP OF SCRAP HORO PAIRS BEGINNING AT 
♦SCRAP*. EMPCT HOLOS A COUNT OF THESE ENTRIES. EHPCT IS 1 IF 
THERE ARE NO VALID ENTRIES BUT THE FIRST ENTRY HAS BEEN ZEROED 
AT LOAD TIME ISCRAP OATA 0). RESERVE THE RBT CHANNEL. REAO 

P. RBT AGAIN TO SET THE EMPTY CHAIN START IN FRSTRBTr SET 

-S«25f tt IS ^ T ° FRSTRBT TO INOICATE THAT WE ARE CURRENTLY 

WORKING ON THIS WORD PAIRiT SET PREVIOUS, CONTIG," AND START 

TO ZERO. 
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THE ENO OF THE CHAIN, THE WORD PAIR POINTED TO BY LOWSPRAP 

PO V^oT?rul\l H n E n l m r° ° F TH£ CH "^ SO°HE M«E L LOH C SCRAP 
Z*ln \l°J ,TH£ fMD 0F TH£ CHAIN) ANO PREVIOUS < TH^ LAST MORQ 
« *"E EXISTING CHAIN) POINT TO LOWSCRAP. IF PREVIOUS IS 
-r^nI HERE IS ' N ° "ISTING CHAIN SO ME HAKE P.RBT POINT TO 
LOWSCRAP." IF CURRENT IS NON-ZERO WE ARE NOT AT THE END OF THE 

-CURR^T^Pn^^n^nf SEE " ""SCRAP IS SMALLER IhAN OUR ™ E 
CURRENT POSITION ON THE EXISTIN6 CHAIN. IF IT IS SMALLER TT - 
MUST BE MERGED BETWEEN CURRENT ANO PREVIOUS. TAKING INTO 

BE C SET T tJ> N pI I «t E ^° US HA¥ N0T EXISr IN HHIC " P.r"h5« MOU- 
SE SET TO POINT TO LOWSCRAP, IF LOWSCRAP IS LARGER THAN 

-CURRENT WE" MUST MOVE TO THE NEXT WORD PAIR DOWN "e EXISTING- 

^CHAIN SO WE READ CURRENT TO GET THE ORDINAL OF THE NEXT HORn 

PAIR, SET PREVIOUS TO CURRENT. AND SET CURRENT TO WHaJ THE - 
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RBT STORAGE MANAGEMENT 



CALCULATE THE CURRENT END m 'J** NT SH0MS THAT LESS THAN Z°° 
«AuSe (/100B» IN CURRENT. IF KB TCNT S HQ^ ^ MHirTO™ JO 
FREE HORO PAIRS ARE IN T"*^™^ STORAGE IF THERE fRON 21B 
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LOO RBTCL" TESJ IF EMPTY" CHAIH-EXTENDS-TO-EW— 

iN " & _ of RBT storage area 



~I51o" 
1522 
1523 
152<. 

1525 
15Z5 - 



"303 r 
170 2 

"1071 
3-.lt 



"SOD 
ZJN 
LJM" 



♦*3 

RCNU 



CONTIG 



"war 

SBN 

shkt 

STO 



"STSRr 



O.Tl 



IF NOT, CANNOT REDUCE "" 

"CALCUL ATE H IGHEST ATJORESS7T0 0B" 

'RELEASE CAN BE DONE TO 



303*. 
^IDTT 



LOO 

"AOTJ- 



CURRENT 
D.Z1 



1527 
1530 
153r 



-321 r 

060 2 
3511 



ti 



(H 

I 

LU 



~1532- 
1533 

153*- 
1535 

1536 
"1537 - 

1540 
"151.1- 

1542 
"1543" 

15%'. 
-15*5-- 

1550 — 
1551 




~SBD~ 
PJN 

RA0~ 

~lvc - 

SBO 

SBD" 

PJN 



~TJ.T1 
•♦2 

~~D.Tr 



-(A)- CONTAINS ADDRESS- RELtASE-SHOUtD- 
B£ OONE TO 

COHPARE WITH OUR LIMIT 

PICK THE SMALLEST ~ 



~LRA 

O.Tl 

HBTCL" 

RCN11 



3530 

-rvitr 

6012 



-3 01 r 

1006 
"1602" 

621.2 
"170 2 ■ 

6370 2167 
'6212- — 

3732 



RAO 
~LDN" 
CRO 
LOO" 
SHN 
AON' 
CWO 
"SBN" 
CWH 

-xwo- 

SO0 



RBTCL 
TVCCK"— 
0.T2 
- O.Tl 
6 

"2" 

ZERO 



(At a NEW RBT LENGTH 
-CURRENT LENGTH— — 
NO REDUCE TOOAY 

STORE NEH LENGTH 
TIME" OF "DAY 



_. Z . £R0 NEM "NO OF CHAIN POINTER 



rbtmark.q.ppone 

o;t2 — — 

R8TCNT 



MARK END OF RBT, WITH TIME 

IN SECOND WORD 

BACKUP NO. OF ZERO CHAIN 

ENTRI£$ TO NOT COUNT THE MARK PATR" 




1RN 

SC40854 

SC08S4 

SC08S4 

SC40854 

SC0854" 

SC4Q8S4 

1SN 

1RN 

1RN ■ — 

1RN 

1RN 

1RN 
~" 1RN 

SC0854 
SCOBS'. 
1RN 
"" lRN ~ 
SCOBS'. 

1RN 

1RN 

" 1RN 

1RN 

~1RN 

1RN 

— 1RN 

1RN 

~1RN 

1«N 

~1RN — 

1RN 

"1RN 

1RN 

" 1RN " — 

lRN 
"SC0854 ~ 
SCO 851. 
1RN 
1RN 
"SC08S4 
1RN 

SC4fl854"" 
SC0854 
SCO 85% — 
SCO 851. 
SC0B5*- 
1RN 
lRN 
1RN 
1RN 
1RN 
1RN 
1RN 
-lRN" 
1RN 
1RN" 
1RN 



746 
60 
61 
62 
63 
"64"" 

65 
748 
749 
"750 
751 
T5*~ 
753 
755 
66 
67 
757 
~75»— 
68 
759 
760 
761 ~ 
762 
~763~ 
761. 
765 " 
766 
767 — 
768 
"769 ~ 

770 
"771 — 
772 
773 ~ 
771, 
— 87~ 

88 
"775 — 
776 

89 ~ 
777 
-90 ~ 
91 

92 — 
93 
94" 
778 
779" 
780 
781 
782 
783 
781. 
785 
786 



1 



L-" 

LU r 

03 



I 



^ 



C 



© 

© 

© 

© 

© 

© 

© 

o 

© 

© 

© 

© 

© 

© 

© 

© 



^v-— 



iJMJOLIC R£F£REMC£ rABLe. 



"IRN ■"- CONTAINS, RCN - -" "RELEASE "CHAIN, "AOS - AGE OfUEUES 
RCN - RELEASE CHAIN AND/OR REQUEST OR RELEASE RBT STORG 



WMITHJJ J«/?Uf f « 



COMPASS 3.7507?. 



U9/10/7a 09.59.38. 



09/10/75 09.59. 3"8. 



PAftF «c- 



page~~ 



18 



"1562 
156} 
156<. 
1565 

"1565"" 

1567 



11.13" 

6010 

3711 
3610 
"3010 
6111 3331* 



DROP" 



1571 
1572' 
1573 
T57*'" 
1575 

1576 
"160 0" 

1631 
"1602"" 

1603 

1605 
"1606" 

1607 

1611 

1612 
" 1613 

1615 
" 1616" 

1617 
""1620 

1621 



3011 

3^.01 

1002"" 

3501 



5001 3335 
"12 7 7 

31.02 

0100 1662 



OATQ 



1<.00 
3 ".0 3 
5003 
050*." 
11.77 
0200 
1071 
320 2 
01.03 
-3633" 
0365 



CAT 01 



2157 



OAT1 



0220" 



1622 
""162-. 

1626 
"1627" 



5003 2157 
-510 1 3337 
1277 

-31,03 



0AT2 



U 



'1 



"1630" 

1632 
T633" 

1635 
"I636 - 

1637 

16"«0 
16*2 "" 
16*. '. 
16,5 - 
1646 
-1647 - 
1650 

1651 
""1653"- 
165<, 
"1655" 
1657 



"50or"3337~ 
3^0^ 



-506I~TJ«r 
3 50 •. 

-^703" 
0573 



DSTT" 



5001 333*. 
-pI0"l""3TW" 

1063 
""OiOi. 

300 «. 
"1076 

3<<0<. 



CRO 
"SOD 
AOD 
COO 
CRN 

1.00 
"SEN"" 
STD 
"SHN 
RAO 

LOM 

" LPN 

STO 

"NJN"~ 
LJM 

LOM 
STO 
LOM 

-NJN" 
LON 

" RJM 
SHN 
SBO " 
ZJN 

-"A OD"" 
UJN 

LOM 
"ADM" 

LPN 
" STO 



"778 



P.RG.S 
O.T0 

D.T1 

O.T0 

TS.ro 

OAT.Q.Tl 
0.T1 

""1 " 

0.21 

~z ' * 

O.Z1 

DATtl.D.Zl 



ADJUST FOR DUMMY OAT ENTRY 
READ THE OAT TABLE 



CALCULATE INOEX OF LAST OAT 



0.Z2 

""DATOr 

OAT32 





0.Z3 

RELACT,0.Z3 

"■♦*«. 

77B 

R.MTR"" """" 

-6 

0.22 " 
OAT2 

"0.Z3 

OAT1 



RELACT,0.Z3 
~UAT»3,0.Z1 

77B 

~ 0#z3 -— - - 



SAVE EQ.P TYPE 

SKIP DUMMY DAT ENTRY COUAL ACCESS) __ 

SEARCH FOR MATCH IN REL, ACT. TABLE 



JUMP IF FOUND 



5001 3336 
~31fli» : 

1076 
-5«l-333"6r— 

1400 



OAT33 



"rc*r 

STO 
"LDM" 

RAD 
"~SO0"~ 

NJN 

LOM 
ADM" 
SHN 
"ZJN" 
LOO 
"SHN" 
STO 

LOM 

"AOO 
SHN 

_ STM 
LON 



-DAT+3.0.Z1? 

O.Z't 
CAT+<»,D'.Zr 

0.ZI. 

— ~d;z3 •"" 

OAT3 



OAT, O.Zi 
DAT +5, O.ZI 
-12 
DAT33 
O.Zi. 

~-l 

O.Z4 



GET RELATIVE ACTIVITY 
INCREMENT BY 1 IF SYSTEM DEVICE 



i IF" SYSTEM DEVICE, "OTHERWISE" 



AOO TWO OUAL ACCESS FLAG 
TO SEE IF BOTH SET 

JUMP IF" NOT DUAL ACCESS 
DIVIDE BY 2 IF DUAL ACCESS 



DAT*2,O.Zl 
-O'.ZV 
-1 

DAT+2,D.Z1 




AVERAGE HITH OLD ACTIVITY 



IRN 789 
IRN 790 " 
IRN 791 
1RN 792 
IRN 793 
IRN 79V 
IRN 795 
IRN 796 
IRN 797 
IRN "798 " 
1RM 799 
IRN 800 
IRN 801 
IRN 802 
IRN 803 
FEAT51.A27 1 
IRN 801, 
FEAT08A 93 " 
FEAT08A 91. 
FEATQ8A 95 
FEAT08A 96 
IRN 807 
IRN 80 8 

IRN 809" 

IRN 810 
IRN 811 
IRN 812 
IRN " 813 
IRN 811, 
"IRN 815 
IRN 616 
IRN 817 
IRN 818 
IRN 819 
IRN 820 

IRN 821 

IRN 822 

"" IRN 823 

IRN 821, 

IRN ■"- " 825 

IRN 826 

"IRN 827" 

IRN 82 8 

' IRN 829 

FEAT08A 97 
FEAT08A 98" 
FEAT08A 99 
" FEAT08A '" 10B 
FEAT08A 101 
FEAT08A" 102 
FEAT08A 103 
FEAT08A" 10<t 
FEAT08A 105 

""""IRN 831 

IRN 832 

""IRN 833 

IRN 83*. 



♦ i 

i 
• [ 



o > 



• ■ 



l 
© I 

! 

. ! 

© . 



A 
i 



lK flBi 0N, flM ''CnHHlEaHHaIN.HI IP- A 

-ggJUL^g'Sg CHflI " ^O/Oft REQUEST OR ftELCASEMT STORG 



ASS 



^^5TI77. 09/10/75 flq.So.lts: a 



09/10/75 '09<S9.3'8TT 



PAGE" 



19" 






1660 



51*01 3340 



1662 

1663' 

166it 

"T6S5" 



150 5 
— 350T 

070 3 
"TTI0Crr57B- 



OAT32 



"1667 
1670 



"3010—- — 
6311 3334 



STM 

LCN 
" R A0 ■" 

HJN 
"LJH" 

LDD" 

gwm 



- DA I*!*£*y. ?I.??...?.VL..?J* CK REauEsr .count 



s 

0.Z1 
»*3 i 

"DATO" 



D.TD 

DAT.O.Tl 



PUT SACK OAT TABLE 



T672 
1673 
167* 
1675 

"1676" 
1677 



""TWO ■ 

6010 
""3313 

3253 
~ITE03 

2101 0000 



_SgT 1RN IN DELAY STACK FOR ASSIGNMENT BY MTR 

nVETflLTTSECOUDS AFTER THE NEXT SeCOND"" 



"OAT«~- 



T.HSC 

O.TO 
"0.T3 
D.PPIRB»3 

Til 



1701 

~I70Z' 

170 3 

TTUV" 
1705 

i7or~ 



1717 

0707 

3013 

-31,-53 

2000 2350 

-51.0fl-21r1.-6- 



~Tsx«rr~- 

Til 



10000B 
15 



" 1711 
1713 

ITU" 

1715 

— 1716— 
1717 
17 20— 
1721 

~~~7ZZ~ 
1723 



~2ooi— trirnr 

3214 
~3f.IT- 

1063 
' 3i.ll 

3651. 
"3G75 

6250 
"T43T 



0200 0220 



1711 



TI2 



"LDK" 
CRO 

~ LDD 

seo 

~PJN" 

ADC 
" CEQU 

ADK -TSINT 
~MJN "~TI2 - 

LOO O.T3 
"STD" 

LOC 
" STM 

EQU 

LOC" 

SBO 
"STO- 

SHN 

STO- 

AOO 
"EDIT 

CWD 
"LTJN" 

RJM 



READ SYSTEM MILLISECOND CLOCK" 

MTR SECONOS CLOCK " 
LAST TIME WE LOOKED AT TAPES 



"Tj;pPIRBfT- 
TPSTAT 
TI3U 



"1001OB" 

O.Ti. 
"D.T2 

-12 

D.Tl — 



(CLOCK WRAP AROUNDI 
"TAPE STAT INTERVAL (IN SEC) 

JUMP IF NOT TIME TO STAT TAPES 
♦ RESET TAPE STAT 
~» TIHING BYTE : 

- CHANGE LJM OROPP INTO 

- LJM TPSTAT - - — 

COMPUTE DEL A r TIME : 



O.PPIRB+<» 
""O.PPMES1- 
O.PPIRB 

NVRFJ 

R.MTR 



WRITE INPUT REG TOMES BUF"WORO-r 
REQUESTPERIPHERAt-JOB " 



1RN 

"" 1RN 

FEAT08A 
". 1RN ■-- 

1RN 

1RN" 

1RN 
" 1RN 

1RN 
" 1RN 

1RN 
~~iRN 

1RN 

1RN 

1RN 

1RN 

1RN 
- iRH ~ 

1RN 

1RN 

1RN 
"' 1RN 

1RN 
~1RH 

1RN 

1RN 

1RN 
~1RN 

1RN 
~1RN 

1RN 
""lRN 

1RN 

1RN 

1RN 
"1RN 



935 
836 
106 
838 
839 

" 8i»Q~ 
81.1 
8*2 
8W3 

" 8I.1. 
81.5 

"81.6- 
81.7 
fli*8 
81.9 
850" 
851 
852 ~ 
853 
851. 
85 5 
856" 
85 7 

"858 - 
859 

- 86 " 
861 
862 — 
863 

- -»6V— 

865 
866 — 
867 

- 868 " 
869 

"870 — 
871 



•— I 




ilRN 



TAItt 



r.M 



STATODI r j;jATU^I_SHOUNlABL£JieWjtGE JABLE 

55 DOT EQU 

57 



AGS" AGE "QUEUES 



"COMPASS 3.75077. 
SIATODT _ 



09/10/75" 09.59.38 



wbot" 



ECk 



D.FF5 
D.FF7 




FWA/8 OF ODT 
MEMBER" 0OT ORDINAL 



— -PAcr" 



FEAT45S 
F£AT<t5S 



2ff~ 






" P.CST 

O.TO _ 

"D.to*c.csr 

CH.OOI 

- O.TO 
O.T3 _ 

- o.n 

STATOGT<» _ _ 
TI2A 

"0 ~ 

P. EST 

— d;est 

O.EST 

- ESTFMA 
O.EST + 1 

" ESTtWA 

p. DOT 
"O.EST " 

D. EST ♦COOT 

00 T "" 

1 
- HOOT '"':'"" 

ESTORO 
STATD010 '"' 



AVOID POSSIBLE PP SATURATION 
-CONTINUE - MO DOT ACTIVITY 



MOOT 

ESTORO _ 
~ESTFHA 

ESTLWA 
-STAT0DT2 

ESTORO 
- ESTFHA 

D.TO 

- O.T0*C.ESTAT 
17-S.ESTRMS 

STATDDTA ' "'""" " 
O.TO+C.ESTHNE 

- io '"" ""' 

108 _ 

— S.ESTON 
STAT 

— D.TOtCiEStAT 

-3 " ' _ 
6 "■ 

S.ESTBSV 
S.ESTFR 

STAT 
DVT *CiE ST AT* 

S 
1 

S.ESTRIO 



CHECK FOR END OF EST_ 



IF NOT RMS DEVICE" 

GENERATE STATUS 
PUT IN OH/OfF BIT 



PUT IN FREE. BUSY BITS 



FEAT1.5S 
FEATI.5S 
FEAT<f5S 
FEATI.5S 
FEATit5S 
FEAT"»SS 
" FEAT".5S "'"" 
FEATA5S 
FEAT ".55 
F£AT«.SS 
•' FEAU5S ""' 

FEAT<t5S 
~F£AT<.5S 
FEATI.5S 
-FEATV5S " 
FEATt.55 
FEATU5S 
FEAK.5S 
~ FEAT1.5S "•" 
FEATI.5S 
FEAT»»5S 
FEAK.5S 
' FEAT1.5S 
FEAT<»5S 
' ~FEAT<.5S ™ 

FEATi»5S 

-' FEAK.5S 

FEAT<»5S 

~ FEAT«.5S 

FEATI.5S 

— FEAT<*5S ~ 
FEAH.5S 

— FEAT<»5S ' 
FEAH.5S 

— FEAT<*5S 
FEAT<»5S 

— FEAH5S 
FEAK5S 

— FEAT«.5S 
FEAT^S 

— FEAT1.5S 
FEAT1.5S 

-•- FEATi»5S 
FEAU5S 

• FEAT".5S 

fEATii5S 
FEAT45S 
FEATV5S 

FEATi»5S 

FEAK.5S 

FEATA5S 

FEATI.SS 



9 
10 
11 
12 
13 
1<* 
15 
16 
17 ~ 

ia 

19 
2 '8 
21 
22 
23 
2<« 
25 
26 
27 - 

28 

29 " 

30 

31 

32 

33 ' " 

3". 

- 35 — 
36 

- 37 
3ft 
39 " 
1.0 

-" ".1 
1.2 
-1.3 " 

-- (,5- 

1.6 
— 1.7" 

<•« 

- 1.9 
50 
51 
52 

- 53 

5«. 
-— 55 

56 










9 



- -i 



*N 
AT 






ilSHC 



O^^^WjL c ^^^^ff £ T A^^^^ ^^^^ ^^^^ ^^^^ 



3. 



110/ 



,591 



2003 

"2034" 

2005 



3522 

-31155- 

100 3 



~zonr 

2011 

"20 1Z~ 

2013 

2arf- 

2015 

"zore- 

2017 



- US2 . 

6010 
""WIT" 

1071 
-3322— — 

1237 
TI5DT ~ 

0100 1755 



RAO STAI 

"TOO 00T""" — — 

SHN 3 

0UP LE.D0T71 — - 

ADD MQOT 

sbn -— u;od7 — "*— 

CRO O.T0 

tf>0" ;tO*C.D&5T>HVDDVSN»5 

SHN -6 

LMO STAT " : ~ — 

LPN 378 

"NJR— XTtLrrW" 

LJM STAT0DT6 



PUT IN REQUEST IDLE BIT 



2021 



CALL1PK 8SS 



20Zr 

2023 
— 2025" 

2025 

232S~ 

2027 
— 203X" 

20 32 
203T" 

2Q34 
" 2035" 

2036 
-~2037"- 

2040 
~~2V<tT~ 

201,2 



Ton-Trer 

3410 

T071- 

1377 



31.2013 



OV.1PK 



"""34 IT 

2030 0500 

_ 3«2 

1400 

" 34T3" — 

341h 

"3075 " 

6210 
""140 IT " — 

3411 

"3412 

1432 
""020 0~rezD~ 



Otf.lPK 
"3RKrP"" 
D.TO 

-6 

776 
O.Ti 



EQU 
~T0C" 

STO 
"SHN 

SCN 
"STO" 

LOC FC.1PK5*100B 

"" 3 TB" ; T2 

LON 

" STQ . T3 

SID 0.T4 

"COD " D.PPHE5T - - — 

CWO O.TO 

TDf — 

SID O.TI 

" STO" OVT2 ■ — 

LON H.RPJ 

"R-JH— RTMTK 



FEAT45S 
' FEAT45S" 
FEAT45S 
FEAT4SS 
FEAT45S 
■"FEAT45S 
FEAI45S 
FEAT45S " 
FEAI45S 
FEAT45S 
FEAT45S 
FEAT45S 
FEAT45S 
FEAT45S 
FEAT45S 
FEAT45S " 
FEAT45S 
FEAH5S" 
FEAT45S 
FEAT45S "' 
FEAT45S 
FEAT4SS 
FEAT45S 
FEAT^5S— 
FEAT45S 
FEAT45S 
FEAK5S 
FEAT45S 
FEAT45S 
FEAT45S -■ 
FEATU5S 
FEAU5S - 
FEAT45S 
FEATV5S - 
FEAH5S 



57 

~"58' 
59 
"60 
61 
62T 
63 

6V" 

65 

'""" 66" 
67 
68" 
69 

- 70" 
7i 

"72 
73 

~"7<i~ 
75 

"76" 
77 

" 78 " 
79 

~ 80 "~ 
81 

"82 - 
83 

sit- 
es 

~ 86 ~ 

87 
"88 " 

89 
"90 ~ 

91 
"92" 




■*.«>> 



5Sf.r. ; y., >»)«v ,-. 'f •&& y* f*u*a*MSa»sr.&i 




rrmfh ■ ' [■ tir t — 



e 



1 r> 



I 

ru 



iRn --"COHTATHS. "RCT -"RECEASt CHAIN,""AQS - AGE QUEUES 
RCN - RELEASE CHAIN AND/OR REQUE ST/RELEASE RBI L.STOiJACE 



COMPASS "3.76077. 
RCN 



09/10/75" 09.59.38. 



PAGE' 



"22 



TAF 



201*5 



O1O0 3032 



T AF 

T I3_ 

IPTF 
~"PR8T 



"TWANG" 
TFl 



TF2 



IFNE IP.TF.O 
— R-JH "VECN 

ENOIF 

LJM OROPP 

IFEQ IP.TFtl 
_ "ENH "" X" 

LOO RBTPTR 

SCN 7B 

ZJN TFl 
" RJH HANG 

LtIO RBTPTRU 

"~A00 RBTPTR ~" 

NJN TF2 
""RJH "HANG 

LOD RBTPTR 



TFT 



~STH" 

LON 
_ STO 

LON 

CRN 

LDM 
~SHN 

SBC 
" PJN TF3 

RJH HANG 
"SHN 

SBM 
"SHU" 

PJN 



"SAVECECL" "~~ 

1 

RBTPTR 

P.ROS 

BUFFER, RBTPTR 

BUFFER* 1 . 
~3'~ "' ■""■ 

RBTPTR+1 



1 



SAVECELL 

— "12 

TF<* 

RJH "HANG 

TFi» LDM SAVECELL. 

— — STO RBTPTR" 

LOO RBTPTR*3 

XJN — TF5 "" ' 

RJH HANG _ 

-XF5~ A DC -2 B " ' 

MJN TF6 



~TF$- 



RJH HANG 

LDD" RBTPTR*3" 

SHN 5 
"SBO KBTPTR+2 

PJN TF7 
"RJM"~"HANG"~ 



< 



"TFT" 



• 



* 



a 



~1D0 RBTPTR*V ~ 

STH SAVECELL 
"LON — " 1 '" 

STO RBTPTR*** 

TON P.CMFL 

CRN BUFFER, RBTPTR*** 

~X0H BUFFER*** 

SBH SAVECELL j_ 

"2JN" TF8 "" 

RJH HANG 



lRN 

CHECK EMPTY CHAIN 1R *J 

1RN 

- ' ""'IRN 

AT TP STAT TIME CHANGEO TO LJH_TPSTAT IRN 

IRN 

--■■•■ ; ■• = ■'--- " "IRN " 

CHECK POINTER IN HORO 2 OF CH iRN 
GUARANTEED TO BE .LT. 10O000B IRN 
JUMP, BITS 59-5<* OK J*N _ 

IRN 

- — - ' ' ' "IRN ~ "" 

JUMP, RBR FWA OK j**J 

IRN 

— - - - ~ ~ IRN '" 

IRN 

- - - -~ IRN 

FEAT67E 
"GET POINTER WITH FWA OF OST 1R« 

FHA OF OST/8 __ |* N 

"FWA OF OST ~ J™ 

COMPARE TO FWA OF RBR AREA • 1R" ... . 

. r .. ..... ,..~... . .-■ — IRN 

IRN 

- IRN "' 

IRN 
_ ■- IRN 

JUHP, FWA OF RBR-S OK IRN 

— : — '■''- "" " "" """ IRN 

IRN 
"RESTORE DIRECT CELL ~ "' IRN "'" 

~~JUHP, RBT "LENGTH IS N0N-ZERO _ f0K» IRN ~ 

— - - - - IRN 

JUMP, SHOULD NOT HAVE MORE THAN 10K IRN 

RBT WORD PAIRS '" i RM , 
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VRH 
VRM" 
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V RM 
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"USE " 
EKOIF 
IFC 
IJM 
"IFC 
IJM 
"IFNE" 
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— VRM 

VFO 

" ENDM ■"" 

USE *__ . 

— EHDH 
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NJH FHAIT1 
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IP.PTCN 
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DO NOT ASSEMBLE- IF ONLY"0N£ CffANNEt 



CH.IF 



• 



2301 



7553 



1 



"3325" 
3325 



IF 
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USE 
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END IF 
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USE 
"• VRM 
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RJH CEEF 
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ENDM' 
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CHOP 
CHOP 
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VRH 
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ERR 
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IFLT 
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TA.CVST 

FCONV 

STSVER 
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TA.CvS 
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DEF,TA.CVS,3 ~ 
TA. CVS, 1008,2 

TA.CVS" — ~ 

.,1 



FUNCTION FOR CONVERTER STATUS" 

INPUT ♦ VERIFY RECEIPT Of 1 BYTE. 
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2321, 
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""23:30" 
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IFNE 
"STM TA.CVS 

ENDH 

LOC TA.EQST 

RJM FCONV 

RJM" """5T5VER ~ 

STORE TA.EQS 
"IFC NE, =_!==, 1~" 

ERR , 

"IF DEF, TA.EQS ,"3" 

IFLT TA.EQS, 1006,2 
"5 TO 
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IFNE 
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ENDH 
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IFNE 
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" STORE 
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STORE 
HSTS 
MSTS 
MSTS " 
MSTS 

"STORE 
STORE 

"STORE 
STORE 
"STORE- 
STORE 
STORE 
STORE 
HSTS 
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MSTS 
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CHOP 
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SHOP 
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... VRH - CE« _ CH0P .2 

USE TA.CHE _ CHOp , 2 

VRH .... CHO p ■ -- .2 

use _*„.:.......- — " CHOP «2 

— USE ■ * . "CHOP .2 

CH.IF ENOIF -^ -f" -■— ' " CHOP .2 

— rpc NE,= -;'p TCN _ : chop -—.2 

IANPSN •If-! , 1.5* 1 - CHOP -2 
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-IFN6- J: l ?i - - CHOP ".J" 

USE TA.CH — - rt 3 

VRH COP.TP' "I* - *J - 

VF 120/COP.TP |»™ p >2 

"ENDM _ CHOP " .2 

USE » ■ ' rtSTS .1 

ENOH " ijHfSTSfftLL _ ,UHP_ ON. HARDWARE ERROR. ^ - .; 
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™« °i" "' CHOP .2 _ 

USE ■ TA.CHE _ CHOp z 

VR" """~J _ ..... CHOP ".2 " 

USE * CHO p .2 

USE * , CHOP" .2 

"•IF ENDIF_ ±k;1 - - CH op .2 

YjI stsfail.ip.ptcn _ . — - « '! 

23*.2 __..__— ifc — EQ.,=STSFAIL«V1 CHOP .2 . 

"" ,W« S ~ « T ASSEMBLE IF ONL, ONE CHANNEL CHOP .2 

IFNE- 1.IP.HTCH.5 SHOP ".2 

USE T ** C " - y,RH .3 

VRM COP.TP __ «£ .3 

VF0 12D/COP.TP . -— -■ «» p #2 

ENDM' - HO p v-. 2 - 

USE _» ' MSTS .t 

S ocnpsn "fZ"":l 

"™ r "gSf P "" !T ^.CHOPIN. CHOP .2 

—CHOPIN tftU Tfl CH -- CHOP -2 

RESA" -"bIs-O ' TNITIALIZE CHANNEL ADDRESSEE, __ "£— ?J 

VRM - — 2;li chop .2 

V 5T St ?HE ~~ CHOP" -2 

USE TA.CHE z 
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USE ' * 
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IFC NE,===,1 
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IFNE l.IP.NTCN.S 
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VRM COP.TP 
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ENDM 
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ENDM 
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"tWO "" 

6Q00_ 
"300* 
2300 5555 



50 3 
0100 3032 
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LON 

CRD 

LOO 

LMC_ 

ftJN 



T.JOATE 

o.zo 
o.zo*4 
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60 00_ 

"3100 
0567 



TPS2 
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IFC 
"ERR 
IF 
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"IFNE " 
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STORE 
"IFC" 
ERR 
If 

IFLT 
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IFNE 
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"ENDM 
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"LOAD 
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" ERR 
IF 

IFLT 
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ERR 
IF 
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ENDM 
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LOAO 
LOAD 
LOAO 
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D 






_ -iRVi -CONTAINS. RCH * ..._. - 

TAPE STJUUS_£9°J " EMOM .... 



COHPASS 3.75077. 



09 / l 0/75-04.5^38r 




...„._. OCH 

... — 1RN 

NEVER USED CH.E_S.I_. J J|{ 



PAGE ~ 3B 
.1 



1179 
11*0_ 



tfiT »-DROPP.i?!i* ~ Z jK « l 

t JH- -DROPP- — - ' Z JK -\ 

skip .. * ,_ - - "* a 

ft JN ** 3 „„ ..• ■"■ ___— — ■ 

__** _ °?° p -? : _____ __ —-■ 

IMOH 




CONTAINS, KCN - RELtASt CHAIN , AU5 
— -, s c m^r ' ' — 



AbE UULUHi 



uunfAbb i.i^ufii 



u^/m/n uf«3f«Jo* 



"24 7T" 
2<.7t 



1<.00 



-21.72- 



21,72 



3«.50 



IFUO. XP.NlCN.t.Z 

CHOP - ' LDN ' 

RJM R.RCH 
" SETC O'jESTORQ 

LQK 
'STORE — ESTBRD 

IFC N£,=__==»l' 
"ERR , 

IF 0EF,EST0R0,3 
~IFLT ESTGRB,10«B,2~ 

STO ESTORQ 
"TFNC" 



nui v nuc TAP*-" r.HANNFL 1RN 1183 — ' ■» 1 



» IF ONLY ONE TAPE CHANNEL 
"* SAVE SOME TIHE BY 
« REQUESTING IT NOW 



-OPERAND 



EStORO 



2*73 
2h7i» 
"2S7S" 
24,77 
2.50V 
2503 

2502;- 

2505 

"250E" 

2507 

2510" 



"307 7 " 

2177 7622 



333TT 



Yoffo 
5500 2262 

505 0" 
0512 

-j&so 

3153 



-ST1 



"ST2 



-725T" 
0571 



2510 



COP.TP 

TH.IF~~ 

CHOPIN 



RESA 



jr 
1 

tn 
J) 



chv 



"2510" 



3332 
3332 



PIT 



"'2510 



\ i 3 



# 



2511 " 
2513 

2515 
"2515" 
2517 
2521" 
2523 



020 326" 
0100 3£U)1_ 

6032 

3050 

2100 3600 
"5«,00 2261 
1003 



STM 

"ENDM 

ENDM 
"LCD' 

ADC 
~ S'hrt'" 

RAM 
" LDH 

NJN 
"AOO " 

ADO 
~SB0~ 

NJN 
""CHOP - 

SET 
"IF 

EQU 

-use- - 

BSS 

- VRM — 

VRM 
'USE' 

VRM 
-USE"" 

USE 
" ENDIF 

IFC 

LON """ 

IFC 

LDH "" 

IFNE 

USE '"." 

VRM 

VFD 

ENDM 
"USE -- * 

ENOM 

RJN" R.OCH 

LJM OEQ 



~ O.PPSTAT 

-l-T.PPSl 
~"6' 

CEF3 
" "LIST.ESTORO" 
ST3 
"ESTORO 

ESTFHA 

— ESTfNA 

ST1 

— LON "" 

» 

— "-0EF, CHOPIN" 



(At 



PP NUMBER 



SETUP FOR CEFAP 



TAVCH" 



D.T1 

CEF3 

TA.CHE 



¥ --" 



NE,=",i 

.IP.PTCN "' 
EQ,===,1 

IP.PTCN " 

1,IP.NTCN,5 
TA.CH ~~" 
COP.TP 
120/COP.TP - 



INITIAUZE "CHANNEL - ADDRESS-TABLE" 



OO NOT ASSEMBLE IF ONLY ONE CHANNEL 



ST3 



CRO 
"LOO ~ 
ADC 
STM - 
SHN 



D.EST 

ESTORO 

DRVR*100S 

CEFZ 

3 



DRIVER CODE ANO EST ORO FOR CEFAP " 
0OCAB0 



1RN 

"" 1RN 

1RN 

"' 1RN 

SETC 

SETC 

STORE 

STORE 

STORE 

STORE 

STORE 

"STORE" 

STORE 

STORE 

SETC 

1RN 

1RN 

" 1RN" 

1RN 

1RN 

1RN 

"" 1RN 

1RN 

~ 1RN" 

1RN 

1RN 

C«OP 

CHOP 

SHOP 

"CHOP " 

CHOP 
"CHOP ~ 
CHOP 
CHOP 
CHOP 
"CHOP" 
CHOP 
CHOP 
CHOP 
CHOP 
CHOP 
"CHOP 
CHOP 
"CHOP" 
CHOP 
VRM 
VRM 
"CHOP " 
CHOP 
1RN" 
1RN 
" 1RN 
1RN 
— 1RN " 

1RN 

- 1RN " 

1RN 



1163 
1185 

lta6" 



.1 
.1 

.2 

".2 

.2 
_ 2 

.2 
.2 
.2 
.2 

.1 

~ 1187 

1188 

1189 

1190 

" 1191 

1192 

1193 

119<t 

""" 1195" 

1196 

1197 

.1 

.1 

.1 

.1 

.1 

.1 

.1 

a 

.i 
a — — 

.i 
.1 
.i 
.1 
.i 
" .i 
.i 
.1 
.i 

.2 

.2 

.1 

.1 
1198 
1199 
1200 
1201 
-"1202" 

1203 
—"120 V" 
120S 






nowuninw i mnmw p w 



/! 



i i 



' - 

■t 

i r ~ - 



> 



"iRN" - "CQN't'AINS ,'" RC»T 
TAPE STATUS CODE 



'RELEASE" CHAIN", AO.S - AGE QUEUES 



COMPASS 3.75077. 



09/10/75 09.59". 38. 



2524 
2525 
2526 

"2530 
2532 

"2533 
2535 



3350 
1370 
2m 5332 

-SV0fl"~3z"fiT 
3035 

5<.0fl 3211 



LMD 
SCN 
ADC 
STM' 
LOO 
"LPC" 
STM 



ESTORO 

70B ■'■■»"■" 

2R00-DRVR__1000B 

msgxpevi *~ 

O.EST*3 

'3777B" 
MS6XPE 



OOCAXB 
0DGAD6 

000A0B * 2R0O 
"UU INTO MESSAGE 



OT INTO MESSAGE 



1 - 



cne;tc" 

* 



, Q 



f o 



<~ \ 



x: 

tr 
o 



€ 

C 



-2537 ~ 
25".l 

"25i.2 '"" 

25<»3 
'25<.-« 

25>*5_ 
"2546 

2547 
"2550 """ 

2551 
"2552 " 

2553 

255i»""' 

2555 
-"2556 " 

2557 
_ 2560 

2561 
—2562"" 

2563 
— 2564" 

2565 
~ "2566~ 



-50"(n)""2"566"" 

1277 
" 340 7 

3033 
~1237 

320 7 
"0417 

3033 
"1071 ~ 

0-415 

1207 

Qit33 

-OT34 

1237 

"0410 ~~~ 

3207 
"0426" 

3034 
— 1B71 ' 

0403 
-U20T 

01.21 



2566 



STOKZ 
STCNO "" 

COP.TP 
CH.TF~~ 

CHOPIN^ 

RESA 



"ChTIF" 



"1 - 



" 2566" 



«TT 



3333 
"3333* 



-2565" 



TFNE IP.NTCN,T 

~LOM " -STCNO 

LPN 77B 

STO OCHAN 

LDQ O.EST»l __ ._ 

LPN 37B 

SBD OCHAN 

"ZJN "STOKZ 

LDO O.ESTH 

" SHN '""" -6 

ZJN STCNO 

S60 OCHAN 

ZJN STCOK 

-\x>o o;est*2 

uPN 37B 

"ZJN STCNO 

SBD DCH(M 

"ZJN STCOK '"-"" 

tOD O.EST+2 

"""SHN -6 """ 

ZJN STCNO ____ 

_ SBD OCHAN 

ZJN STCOK _____ 

— CHOP LON 

SET * 

" TF -DEFVCHOPIN" 

EQU * 

- " USE — "" TA "". CH i 

BSS 

— VRM """ D.Tt 

VRM CEF3 
— USE T A . CHE 

VRM 
— USE r ~~» " 

USE * 

~ ENO'IF" 

IPC NE,===tl 

~ LON "~, IP.PTCN" 

IFG EQ,===.i 

— LCN IP.PTCN 

IFNE 1.IP.NTCN.5 

— "USE TA.CH 

VRM COP.TP 

~" VFD 1207C0P.TP" 

ENOH 

— USE — -**" ' 
ENOM 



SAVE SOMETIHE IF ONLY 1 TAPE CHANNEL" 
"GET TAPE CHANIN USE TOR 77BIF "HONE! 
MOVE TO DIRECT CELL TO SAVE SPACE 



NO SECOND CHAN 



"NO THIRD CHAN 



NO FORTH CHAN 



— INITIALIZE CHANNEL AODRESS TABLE- 



DO NOT ASSEMBLE IF ONLY ONE CHANNEL 



PAGE 



SC 43251 

IRN """ 

1RN 

IRN "' 

1RN 

IRN '" 

1RN 

1RN 

1RN 

1RN 

1SN 

IRN 

1RN 

IRN 

IRN 

IRN 

IRN 

IRN 

IRN 

IRN 

IRN 

IRN '"" 

IRN 
"IRN 

IRN 

IRN 

IRN 

IRN ""' 

IRN 
""IRN 

IRN 

IRN 

IRN 

IRN -""' 
CHOP 
SHOP 
CHOP 
CHOP 
CHOP 
CHOP 
CHOP 
CHOP '"""' 
CHOP 

CHOP 

CHOP 

CHOP 

CHOP 
" CHOP """'" 

CHOP 

CHOP """ 

CHOP 

CHOP " 

CHOP 
"VRM "'""' 

VRM 

CHOP" 

CHOP 



"40 



3 

1207 
120 8 

"1209 
1210 

"1211 
1212 
1213 
1214 
1215 
1216 

-1217 " 
1218 
1219 
1220 
1221 
1222 

"1223 
1221, 
1225 
1226 
1227 
122* 

"1229 
1230 
1231 
1232 
1233 
1234 

- 1235 
1236 
1237 
1238 

"■" 1239 

.1 

.1 — 

.1 

.1 

.1 

.1 

.1 

.1 

.1 

.1 

.1 

.1 



.1 
M 
.1 
VI 
.1 
.1 
.1 

;2 

.2 
.1 
.1 



i! 



* ~ J TAPTTTAlUb!'' CfllTk ^^* ^" ^ 



177; i 



109/ 



091 



AGEI 



7 



i 

« 

< 



i 

er 



"2566 
2567 

"2570 
2571 
2572 
2574 

"2575 
2576 
2577 
2600 

"2602"" 
2604 



-1 



T477 
1777 

"040 4" 
lt>77 

"0200 
3034 
3412 
3033 

"1340 
020 

"2000" 
0200 



0"326" 



STCGET 



030 3 
T32F" 

0355 



?606" 



"STCOK"" 
ONE.TC 



OSS 

"LON 
SBN 
ZJN 
AON 
RJH 
LOO 
STO 
LOO 
SCN 
RJH 

"IOC" 
RJH 

ecu 



-1 
77Q 

770 

STCGET " 

77B 
R.OCH '*- 
Q.EST*2 

"0.T2 

D.ESTU 

" 40B 

R.RCH 

--ftESTT 

R.STB 



"JUMP IF FIRST TIME 

"DROP UNUSEA8LE TAPE CHAN"" 



END IF 



2606 
"2610 

2612 
""2613 

2615 
-"Z6T7" 



2000 2000 
"0200^267" 

3036 
"020 2267" 

0200 2311 



2617 



3020 



2620 
~2621 

2622 
"2623" 



041". 
"3423" 

1204 
"0432 



"5TER668X 



LOC 
"RJH 

too 

" RJH 
RJH 

"VOA 
IFC 

"ERR 
IF 

"IFLT 

LOO 
"IFNE 
LOM 
ENOH 
ZJN 
STO " 
LPM 
ZJN 



TA.CVSL 
FCONV 

o.esT*4 

FCONV 

SIS 

TA.CVS 

NE, =__==,! 



SELECT 6681/4 
SELECT EQUIPTMENT 



OEF, TA.CVS, 3 

TA.CtfS.iflOBVa- 

TA.CVS 

, ; i 

TA.CVS 



STZ 

" JREH 
4 
NOTREADY""" 



NON ZERO = OIO NOT JUST REMIND 



TRANSMISSION PARITY ERROR 



"2624 
2625 

"2627 
2631 
2633 



141 T 
0200 2231 

"2000 32rr 

020 0705 
"0322 



LON 13B " 

RJM CEEF 

LOC" "- MSGXPE" " 

RJH R.DFH 

UJN NOTREADY "" 



XMSN P.E. FOR CEFAP 
"*DTXX XMSN PARITY "ERROR*" " 



1RN 

~ 1RN 
1RN 

'"' 1RN 
1RN 

"~1RN 
1RN 

" 1RN 
1RN 

"" 1RN 
1RN 

~ 1RN 
1RN 

"' 1RN 
1RN 
1RN 
1RN 

'"" 1RN 
1RN 

" 1RN 
1RN 
tRN 
1RN 

"tRN" 
LOAD 
LOAD 
LOAD 
LOAD 
LOAO 

""LOAD 
LOAO 

"LOAD 
1RN 

"" 1RN 
1RN 
1RN 
1RN 
1RN 
1RN 

" 1RN 
1RN 

"■■ 1RN 
1RN 
1RN 



1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1251 
1252 
1253 
1254 
1255 
1256 
1257" 
1258 
1259 
1260 
1261 
1262 
"1263"" 



.1 
.1 

.1 
.1 
.1 

~. 1 
.1 
.1 



1264 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 



"2634 



STZT 



VOAO" 
IFC 
"ERR~ 
IF 



TA.EQS 

NE,=__= 



i <3> 



2634/ 



3021 



2635 

"2636 

2637 



3422 
1223 
1701 



"TFLT 

LDO 
"TFNE 

LOM 
"ENCTM~ 

STD TSTAT 

LPN 238 " 

SBN 1 



OEF, TA.EQS, 3 
TA.£QSil00B,2 

TA.EQS 
Y.1 



TA.EQS 



"" 1RN 

_^ . LOAD 

LOAO 
LOAO 

" ~~ ■ LOAD 

LOAO 

"' LOAD 

LOAO 

TOAD" 

1RN 

" '" "" 1RN 

JA>*0 IF REAOY, NOT BUSY AND NOT AT 1RN 



1277 



.1 

-;r 
.i 
.1 
.1 
.i 
.i 

"VI 



1278 
1279 
1280 









SRC* 



O 



TRN -"CONTATftS." 
TAPE STATUS COOE 



■■Mir --ftecKSE-CHArKr"Aas - ace queucs 



COMPASS 3.750 77. 



09/ 1 0/75 09 ."S9."3"8 .' 



TAKE "*2" 



1". 



261.0 
26-.1 
261.2 
26-*3 

261.5 
""26'i*6 " 

2658 
"26S2 



31.2 3 
"0516 

1 <*••<» 

— - 6200 :-zzsr~ 

11.10 

0200 "2267" 

0200 2311 



2652 



3020 



2653 

"2655" 



051*5 
"0303" 



STO 

'['.IN "" 

LDN 

RJM 

LDN 
"RJM " 

RJM 

LOAD 

IFC 

ERR 

If 

iFiir 

LDD 

IFNE 

LOM 

"ENDM 
NJN 

"U3N " 



JREW 

ST<* - ----- 

TA.CLCW 
FC0NV 

10B 

FCGNV '"'"" 

STS 
~TA.GVS 

NE,= «.l 



DEF,TA.CVS,3 
TA.CVS»1WB,2 
TA.CVS 

,,i " 

TA.CVS 



LOAD POINT. SAVE CONDITION... . 

1'CLEAR CONVERSION MODE «F NOT.O.N 
- MMTC THIS KILL REJ -- OONT CARtl 
ISSUE REMINO : 



STER668X 



JUMP IF PROBLEMS 



— 7655 NOTRE JOY" 



2655 
"2656" 



11.00 
-31.22" 



C\ 



c 



c 



2657 



ST<* 



fc-« 


• 


1 




IT 




ru 


1 


( 






i 


4 




t 


] m 






"2657"" 

2660 
"266 2" 

2661* _ 
"26d6 

2667 
-2670" 

2671 
"2672 ~ 

2673 

-ws- 

2676 
"2677" 

2700 
"270 1 - 

2702 
-"2703" 

2705 
"2707" 

2711 
"2713 



2715" 

2716 
"2717- 

2720 
"2721 

2723 
"2723 

2721. 
"2725" 



-iso a ~ 

0200 2267 

"200 21B0 

0200 2267 

-"30 2 2 "~ 

1202 
"0503 

3023 



"0523 

3035 
— 5i.Q0~ JI"6"2 

3050 
— 3V0"ff ~ 

100 3 

3300""" 

137 
2 10 IT 3333 

S'.OO 3163 
— "20 00 "3162 

O200 0705 

-—oioo ZWT 



ST4.5 



ST5 



EQU ■""" 

LON 

STD 

EOU 

LDK" 

RJH 

LOC" 

RJH 
"LCD 

LPN 

NJN~ 

LDD 

"NJN" 

LOO 

SIM" 

LDD 

"STO 

SHN 

~LMO " 

SCN 
-AOC" 
STM 
LOC" 
RJM 

"LJM 




TSTAT 



— TA.REC 
FCONV _ 

- 2100B" 
FCONV 

"TSTAT 

2 
"STU .5 

JREH 
ST6 •"■ "' 

O.EST+3 
— JREHH 

ESTORO 

— o " 

3 

— — 

7 08 
" 2R00 " 
JREHM*1 

JREHM 

R.OFM 
ST2 



FAKE NOT READY STAT 
' OROP~TAPE"ORIVE ~ 
" "OROP 6681/1* " 



OT 



JUST REWOUND TAPE, OONT CHANGE FLAGS 



1RN 
1RN 
1RN 
" IRN 
IRN 
"IRN " 
1RN 
1RN ~ 
LOAD 
LOAD 
LOAD 
"LOAD " 
LOAD 
LOAO 
LOAD 
LOAD 
1RN 

— IRN ■" 
1RN 

IRN 

IRN 

— 1RN 
IRN 

1RN " 

IRN 

— IRN 
1RN 

— 1RN 
1RN 

1RN " 

IRN 

IRN 

1RN 

IRN 

1RN 

— "IRN 

1RN 

— - 1RN" 

1RN 

- 1RN 

IRN 

1RN 

IRN 



1-.10 

3556 

"3255" 

50 3 

-vitsrszse- — 



5T6 



"305 V 

1003 
"3156" 



Z726" 
2727 



-60"01" 
3001 



LON LE.TAPES 
RAD TTPOS 

S8D TTLEN" 

NJN *»3 
LJM HOOPS" 
TTNOW 

"LOO TTFHA 

SHN 3 

— ADD TTPOS" 

ENDN __ 

— CRO DVZ1" 
LDD 0.7.1+0 



1RN 

1RN 

IRN 

IRN 

1RN " 

IRN 
- IRN 

IRN 
TTNOH 
TTNOW 
TTNOH 
TTNOH 

IRN 

IRN 



1281 
1282 

1283 

1281* 

1285 _ 
"1286 

1287 

1288 
.1 
.1 
.1 

"Vi""~ 
.1 

VI "■ 

.1 
-.1 ~ 

1289 

1290 

1291 

-' 1292 

1293 

" 129<» 

1295 

1296 - 

1297 

1298 

1299 

—■"1300""" 

1301 

130 2 " 

1303 

130 «* 

130 5 

— —1506 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1311. 

1315 

1316 

1317 

1318 

1319 

1320 

1321 
......... 1322 - 

1323 

»1 " 
.1 

.1" 
.1 



132V 
1329 






r_ 







IRN - C0N1 
|BB TfmJTATl 


AINS, RCN - RELEASE 


chain, aqs 


- AGE QUEUES COUP 


ASS 3^75077.^^09/10/75 09.59^8. ^^P< 

IRN 


iGE^^<»3 

1326 
1327 
1328 
1329 
1330 
1331 
1332 

.1 

.1 

.1 

.1 
"~ 1333 
1334 

1335 

1336 
1337 
1338 

" 1339 
1340 
""•" 1341 
1342 
1343 
1344 
1345 
1346 
1347 
1348 
134 9 
1350 

1351 

1352 
1353 
1355 

"1356 

1357 
1358 
1359 
---• 1360 
1361 
" 1362 
1363 
136V 

.1 

.1 

.1 
.1 ' ~- 

.1 

.1" 
1365 


' — 




M b pHi ■ 




Utk \ HI 


i ** 


273D 


325 
0=>63 
3O0t 




SBD ESTORO 


K.J 


i 

j - 

i 


2/31 
2732 


NJN ST6 
LOO 4 


"EST" NOT FOUND, "TRY NEXT "ENTRY " IRN 

IRN 




2733" 
2735 


54UJ 3200 
3005 




"SIM NEWSTAT 
LOO 5 


— "' IRN 

IRN 


' 


27".0 


S40U 3Z01 


SIM NEHSTAT+1 

TTNOH ' 

LOO TTFWA •" " " 

SHN 3 

ADO " TTPOS " " 

ENDN 


IRN 
IRN 

""" " ~~ """" TTNOH 

TTNOH 

'"' " "" ~ TTNOH 

TTNOH 


, 


4 


271.0 
271.1 


" 305*. 
1003 






; ! 
4 

i 


2742 "" 


3156 




-"* 


271. 3 
27 -.-. 


1605 
6001 




ACK H.TFLGS 
CRD O.Z1 

LOO S.Zl+i " "" 

SHN -S.TTFRD 
~ LMO"~ STAT 
LPN 1 


IRN 
IRN 

"" "" IRN 

IRN 
IRN 
IRN 
"JUMP"TF"NO CHANGE" INSTATOS IRN "~ 

IRN 

""" " :' irn 

JUMP IF UNIT JUST CAME READY IRN 
DROPPED READY— HE KNOW NOTHING IRN " 

IRN 


_ 


4 


27i.5 
27-.6 
- 27i,7 

2750 


3002 

1067 




4 

■f 


3322 
1201 




' 


2751 
2752 


"TROT 
3022 




ZJN ST 8 
LOO STAT 

"LPN" " 1" 

NJN ST8.5 
LON 
RJM PUTFLAG 


^ 


: ( 


2753 
2751. 


1201 

0506 




1, ' 

j t 


Z/55 
2756 


140 U 
0200 3117 






2/60 


010 2713 


- ST8" 

» 


UJK 5»5 


"" IRN 

IRN 




1 1 


2762 


2/62 

3022 

3401 


SI 0.5 


tuu ♦ 

LOO STAT 


IRN " 
IRN 

♦ PASS UNIT STAT TO ITS. ' ~ " "IRN " 
» IT WILL BE USED BY ITS TO TELL 4LX IRN 

• 1HE DENSITY TO LEAVE "THE-TAPE-AT? "'IRN " 
CLEAR ALL BUT RING IN BIS IRN 




' 


: ■. 


2763 


STO O.Z1 






2761. 


1204 




LPN , 4 






276> 

2766 


1075 

0200 3117 




SHN -2*S.TTFRI 

RJM PUTFLAG 


~ """ "" IRN ■ 

IRN 




t- 1 


27/0 
2771 


1400 
5458 3334 




LON 

STM LIST, ESTORO 


IRN 
IRN 




JZ 
1 


Z773 
2771. 
2776" 
2777 


305 
5460 3271 


" LDO " ESTORO "" 

STM ROYLIST.ROYCNT 


IRN 
IRN 

"' IRN 

UTS CAN NOT ACCEPT MORE THAN IRN 
"16 UNITSIN ONE CALL) IRN " 

IRN 




IT 
LU 


3660 " 
1720 


» 


~ AOO RDYCNT "' 

SON 16 
" NJN ST 8 " ~ ~ - 




J 


3000 


0557 






3001 




DEQ ■" 


' RCH EST 

IF OEF,CH..EST,2 
"LON CH..EST ~ " 

IFCP 1 

LOAO "EST '•"""" "" 

RJM R.RCH 


IRN 

RCH 




1 
| 


3001 


1440 




'"' " RCH 

RCH 

" " "~ RCH " 

RCH 




1 


3002 
300'* 


0200 030 3 






LNOM 

MOVE ESTFHA, ESTAOR 

LOAD ESTFHA " ' 

IPC Ni., = „",l 
~~ '"RR * ~ ' 

IF OEF, ESTFHA, 3 
"IFLT ESTFHA, 100B.Z 

LOO ESTFHA 
"IFNE" ,,1 

LOM ESTFHA 


RCH 

IRN 

MQVE 

LOAO 

LOAD 

LOAD 

tOAO " 

LOAD 

'" " """ LOAO 

LOAO 


" 


1 i 
1 ! 


40U4 






" .1 
.2 

" .2" 

.2 

.2 

- z 

.2 


> 


1 










1 
\\ 

l' 


300». 


3053 




— t> 

a . 


\) 








\ 








- 




• u ! 


\ 




- — ■ - - .• 











.-~-~ .« .___ 


\ 



















1 



- 1RM - CONTAINS, RCN - "RELEASE CHAIN. AQS 
TAPE STATU S_ CODE :_■ 



-300?" 



- AGE O.UEUES 



COMPASS 3.75077. " 09/10/75 09.59.3*-. 



3005 



3"*51 



"JOTTe 
3006 
3037 



11.00 



o 



300? 



31.5 



O i 



tr 1 

I 

0- 



"3010 

3012 
"3013 

3014 
"3016 

3017 
"3020" 

3021 
"30 22 

3023 
-"302*.' 

3025 



— 505TJ-3TW 

0*07 
'"'60 32""" 

2077 5777 
3532 ~~ 

3051 
623? - 

3fc50 
3651" 



aEorr 



0EQ.2 



3252 

"0563 



3025 



i.i*i*0 



ENOM 

3I0RE" 

IFC 

ERR 

IF 

IFLT - 
STD 
TFNE " 
STM 
ENOH" 
ENOM 
"SETC" 
LOK 
"STORE 
IFC 
"ERR"" 

IF 
" IFLT 

STO 
'■■ IFNE 
STH 
"ENOM 
ENOM 
-~LOM " 
Z.tN 
CRD "" 
LDC 
'RAO 
LOO 
— CMO 
AOO 
~ AQD 
SBO 
-"NJN 
OCM 
— IF — 

LUN 
— TFCP 
I.OAO 
RJM" 
ENOM 
LDO" 
N4N 



ESTAOR, 

NE,=-.==»1 

OEF, ESTAOR. 3 
~eSTADft710Ofl;Z" 
ESTAOR 

"T>i " " 

ESTAOR 



-OPERAND 



0, ESTORO 

a 

ESTORO " 

NE. = — ==.i 

OEF, ESTORO, 3 
ESTORO, "1008,2" 
ESTORO 

-'til 

ESTORO 



— VI ST, ESTORO 
OEQ.2 

— O.EST 
-2000B 

— O.EST ~- ' ~ 

ESTAOR __ 

D.EST" 

ESTORO 
- ESTAOR " 

ESTLWA 

"DEQ1 

EST 

— def,ck;;est,"Z" 

CH..EST 

I 

EST ! 
R."DCH~ 



; OPERAND 



JUMP AROUNQ IF NOT ASSIGNED 

CLEAR STATUS BIT FROM EST ENTRY 



WRITE EST ENTRrBACICTNTO- TABETT 



j • 




PAGE 



LOAD 
"MOVE 
STORE 
STORE 
STORE _ 
"STORE 
STORE 
STORE 
STORE __ 
STORE 
MOVE 
— 1RN """ 

SETC 
"SETC 

STORE 
"STORE " 

STORE 

"STORE 

STORE 

"STORE 

STORE 

"STORE " 

SETC 

1RN "" 

1RN 

1RN 

1RN 

1RN " 

1RN 

"1RN ~ 

1RN 

1RN" "- 

1RN 
— "■ 1RN 
1RN 
— ' OCH ■""" 
DCM 

OEH '■"" 

OCH 
"OCH "- 
OCH 
— - 1RN 
1RN 



>*•* 


.2 

,1 

.2 


— . 


.2 




.t 





.2 




.2 




.2 




.2 




.2 




.1 




— 1366 




.1 




.1 




.2 




-.2 




.2 





- \ 



- I 



.2 

.2 
.2 
.2 
.1 

— ■ 1367" 

1368 
1369 
1370 

— 1371 " 
1372 

1373" 

137<» 

-■- 1375 
1376 

— • 1377 
1378 

— .1 

.1 

__ t - - 

.1 

.1 

1379 

1380 



-• l 



>t> 



'J 

H 

1 



r -'cmmmn 

TAPE STATUS COQE 



*E^^W Cflil^^ffHKr^^^W QUE^^^ 



;omp 



JW. 75 oPP" 



09/10/75 09.59.38. 



PAGE 



1.5 



J 



"» 



_■ AUTO- ASSIGN TAPE QUEUf MANAGEMENT 



i 

< 
< 



I 



THIS PROCEDURE MAKES USE OF THF MULISECONO CLOCK (T.MSCI. 
T.HSC IS WRITTEN INTO THE 3 WORDS, H.STGTLE, W.STGTLR ANO 
W.ST6T LT. THESE WORDS HILL BE REFERED TO AS E, R ANO T. 



EASY 

WRITTEN INTO WHEN IT MIGHT BE EASIER TO MAKE AN " 
AUTOMATIC TAPE ASSIGNMENT. COOE IN 1EJ ANO 1CL 
WRITES INTO THIS WORD WHEN TAPES ARE RELEASED. ALSO 
BY DSO FOR VSN ANO SCR COMMANDS ISYSTEM HAS NEW INFOJ 



REJECT 

WRITTEN INTO WHEN AN AUTO ASSIGN FAILS DUE MOSTLY TO 
TAPES NOT BEING MOUNTED BUT ALSO WHEN OVERCOMMITMENT 
CHECKING DISALLOWS A TAPE ASSIGNMENT. COOE IN 2TACOM 
CREQ, 1TS» SUPPORTS THIS WORO. 



TRY 

WRITTEN INTO WHEN IRN CALLS ITS WHICH TRIES TO HAKE 

AN AUTO ASSIGNMENT. 



CO PE IN IRN TO CALL ITS LOOKS SOMETHING LIKE - 

~ TIT CALL : ITS" 



OR IN WOROS - 



;ge.r> .ano7 (e ;.ge. 



IF WE KNOW MORE tOR HAVE MORE TtESOURES I THAN" THE LUST 
TIME WE LOOKED ANO THERE WAS SOMEONE HAITING IT IS A 
GOOD TIME TO LOOK AGAIN, — *-'__-__ 



"3TT3Z- "DROPP — 



"EQU' 




S . AUTO • - ' ~ 

TSGSET# 

IP.TSG (FOR XREF ONLYJ 



■k.li.:..iri^si*-^i 



»*!';*<„<,,<• <*. &i iff. ;*i ■^.W&wtmrmtitmimmHKSBmm 



IV, IS. AUTOS 

1,1,$"TSGHIC#"$ 

Ea,$-J~TSGSIG#~$,2 

2,,$"TSGMIC#"$ 

•*TSGMIC#~- 

NE.SSJ.i 

i,, $,♦!$■ - — ■ 

IP.TSGiTSGSET#aP.rSGtTS6SET#t 

2QB 

3 . , 

D.TO 

P.STG 

D.ZO 

O.ZOtC.STC - 

W.STGTLE 

TLWORK.D.T0 

2 

INOEX 

TLWORK.INOEX 



' WWtlW il HWMWW 



1S"TSGHIC#""TSGSIG#" 



1RN 
IRN 
IRN 
IRN 
1RN 
IRN 
1RN 
1RN 
IRN 
tRN 
1RN 
iRN 
IRN 
IRN 
IRN 
IRN 
IRN 
"IRN" 
IRN 
IRN 
IRN 
IRN 
IRN 
IRN 
IRN 
IRN " 
IRN 
IRN 
IRN 
IRN - 
IRN 
" IRN 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
IPTSG" 

IRN 
~1RN — 
IRN 
tRN 
IRN 
IRN '- 
IRN 
~1RN 
tRN 
IRN " 
IRN 



1382 

1383 

1381, 

1385 

1388 

1387 

1388 

1389 

1390 

1391 

1392 

1393 

1391, 

1395 

1396 

1397 

1398 

1399" 

1400 

f.01 

1402 

11.03 

1404 

"1405 " 
1406 
1407 - 
l<t08 
1409 " 
1410 

'"1411" 
1412 
1413 



o 



.1 
.1 
.1 
■ .1 
.1 
.1 
.1 
.1 
.1 
-.1 
.1 
.1 
.1 
.1 



1414 
1415 
1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 



■ !"" !! » , W ■ 

f ■ wg t - WBn w ., ' M'<V>' . ' 'iw yi^ gat- w jiw<s ww. *.,~ *>, 1 <*■»;' <.-'3»w>r*iM.--if » i. r v-4 v witty ■ w**i >» ■ ■' 



:i 



* '( 



— ; 



g> 



1RN --TJ0NT71TNS, ROM "-""RELCASE^CHAlMr AftS - AGE QUEUES 
TAPE STATUS CODE 



COMPASS J. 75077. 



09/10/75 09.59738. 



"PACE 



46 



J 



3046 

1050" 

3051 

3052 

3053 

"30SV 
3055 

"30 56" 
3060 

"3061" 



3062 

3063" 

306V 

"30 65" 
3067 

"3070" 

-3B72" 



3072 
"3073 

30 74 
"3075" 

30 76 
"30 77" 

3100 



"7101" 



"310 Z "" 
310* 

"3105" 
3106 
3110" 

1112" 
3113 



520 6 0025 
— 0732 

0504 

""" 3606 

1705 
0567 

140 5 



CC3 



CC4 



"S5M 3047 
1737 

"056T 



XX 



S6H TLWORK+5, INDEX 

MJN"CC5 "" 

NJN CC4 * __ 

"AOO INDEX" ~" 

SBN 5 _ 

"NJN"~EC2 "" 

LDN 5 

"RAM "CC3V1 
SBN TtWORK+15 

NJN "CC1 """ ""'"' 

ENOIF 



LATER CHANGED TO TLWORKHO 
CANT AUTO-ASSIGN HOW 



CURRENT BYTES 

ARE EOUAL SO 

TRY NEXT BYTE 

(W.STGTLR) .L£. (t*.STGTL£l 
'ADVANCE TO CHECK H.STGTiT 
IF HE HAVE NOT ALL READY LOOKEO 
ATH.STGTI.T GO BACK TO CHECK IT 



1".03 



CITS 



"3401 
3074 

1604 



-srtnrrrrr 



LON 
SID 
LOO 

CHM 

A OK 

"CWH 



3 

o.zi " 

O.PPIR 

"IRITS.O.PPONE ~ 
W.PPHES4-1 
"ROYUST>1.0.Z1 



"6607 




"XX "" 

TSGSET# 

TSGSETi 

~TSGHIC#" 

TSGSIGt 



IFOR XREF ONLY* 



TSGMIC* 

" — TSGSET* 

TSGMIC* 
TSGSTG*' 



Tscsrcr 

XX 



1415 

"6000 

1440 

-fconr 

30 0'* 

"1607" 

6210 



— IPTSG "" S.AUTO 

NOREF TSGSETI 

SET IP.TSG 

SET _ 

-MICRO "TiiSS. AUTO J 

MICRO 1,1,$~TSGMIC#"$ 

IFC Ea,J-$"TSGSIG#"Si2 

MICRO Z,,$~TSGMIC#"$ 
"SET " -0 ' ~ " 

OECMIC "TSGMlCi" . 

— MICROT— i,"J$ - 

IFC NE,$$$fl 

"MICRO i,,J,+l$ 
IFGT IP.TSGUSGSETf.IP^TSGUSGSEmiS-TSGMIC* - 

J "ENOM " " 

P.STG _ 

O.ZO " 

T.MSC 

-O.TO ' """ """ 

O.Z0*C.STG 



-TSGSIG** 



"XX" 

* 



LON 
"CRD" 

LON 
"CRD 

LOO 
"ADN 

CHO 
" ENOIF" 



H.STGTLT 
O.TO 



WRITE NEW TIME LAST TRY 



TJ30T- 



-311-5- 



"500"O""31267~ 

0506 

"i_l 

0200 0220 

oioo~oio3" 

3 07 If — 
6370 3260 
0372 



"CC5" 



CC6~ 



"CC7" 



"UJN" CC6 

"LOM—MTSCNT"- 

NJN CC7 
"LON M.DPP 

RJM R.MTR 
"LJH R.IOLE 



- LDD O.PPIR 

CMM MTSTAT.O.PPONE 
~ UJN""CC6 ""'"" 



1RN 
"1RN — 

1RN 
" 1RN 

1RN 
~"1RN 

1RN 
"1RN " 

1RN 
"IRN"~ 

1RN 
~ 1RN— 

1*N 
"" 1RN " 

1RN 

1RN 

1RN 

— 1RN " 
1RN 
1RN - 

IPTSG 
IPTSG 
IPTSG 

"IPTSG 
IPTSG 
IPTSG 
IPTSG 

"IPTSG 
IPTSG 

"IPTSG" 
IPTSG 
IPTSG 
IPTSG 
IPTSG 
1RN 

— 1RN -"' 
1RN 

"•- 1RN 

1RN 
" 1RN 

1RN 

1RN 

1RN 

— 1RN 
1RN 



1425 
1426 
1427 
1428 
1429 

"1430 
1431 
1432 
1433 
1434 
1435 

"1436" 
1437 
1438" 
1439 
1440 
1441 
"1442" 
14*. 3 
1444 



FOUND NTS AND NO NON MTS CAME READY 



"SUBROUTINETO SET TAPES TABLE UNIT ORIENTED FLAG BITS"" 



.1 
.1 
.1 
.1" 
.1 
.1 
.1 
.1 
.1 
.1 
.1 
".I 
.1 
.1 



1445 

1446 - 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

" FEAT4BAK 9 

FEAT48AK 10 

" FEAT48AK 11 

1RH 1457 

1RN 1458 

FEAT48AK 12 

"FEAT48AK 13 

FEAT48AK 14 

" FEAT4SAK "15 

1RN 1459 

1RN " 1460 

1RN 1461 



• 



-rRTr^-c-owAimsT^Rer^ 



COMPASS3: 75077. 



"09/10/75" 09.59V3*". 



PAGE"" 47" 



® 

















_ "1RN- CONTAINS t'RCN" 
tAPE STATUS COOE 


^REL£ASli:HA"iN, AQS" - AGE "QUEUES "COMPASS 3.75077. 09/10/75 09.59.3ft. PACE ki « 


► ! 


j| 


* 1RN 1509 « 


, i 




"~ " USE TA.CH (PUT R.STB LIST BEFORE SCRATCH AREA) 1RN 1510 

333". LIST EQU * i 1RN 1511 


i 


• • 

w 3331. 0000 


"3334" "DAT EQU * l&N 1512 | 
SCRAP DATA 1RN 1613 


* j 


"■■ ' 3336" 


END" " 1RN 1511. 


r 


• 533000 CH STORAGE USEO 3«3 STATEHENTS 1792 SYMBOLS 

MODEL 7*. ASSEMBLY 9.«*22 SECONDS 1290 REFERENCES 


1 * 






! 


.j ~~— ' — — 










\- 






i 


m I 












i 






) 






\ 












1 ■ 




I* ' 


* 


















. 


1 i 




i 
i 
l 






















i' 




. ! 




* 


% \ 



« ' 

« ' 

< ' 



^koI 



R DIRECTORY. 



[REL 



HAII 



IS - 



UE 



PA SI 



\Wh 



.38. 



I PA 



'49 



7 j 



3 TYPE EP.ROR DUPLICATE MACRO DEFINITION. NEH ONE OVERRIDES. 

ocGro*ED"~0jnpffGE-s 



"IT" 



-7 TYPE~ERRCFK 



AOO«SS^Aroe~EXCEEOS FIELD "SI2£t RESULT TRUNCATED 

OCCORREO ON PAGES 41 



I 






P 

7j 'i 



I 



. .»hwiK%«^,.»j,,.i( >'-,«u »:;«»;( «W*';'f' 



ii 



ii 



1RH -CONTAINS, ftCfr-"R"£lEAS£ CHAIN, 
SYHUULIC UertKl.HCt IAULE. 



AGS 



ACE QUEUES 



COMPASS 3.7507/. 09/10/75 09. 59.38. 



PACE 



SO 1 




\: 



CH.RCHN 

C1T5 

C.CSI 

C.ODST- — 
C.OOI 
C EST AT 
C.ESTM-IE 
"C.FCPNiiT" 
C.FCPU 

c;foc — 

C.FDPCI 
C.FtCFL' - 
C.FIOENT 
C.FINFU" 
C.FLINK 
HCFLflKAQT 
C. FLOCK 
C.FPRT — 
C.FTAPE 



2- 

2 

z 

3 



'PTEXT - 

PPTEXT 

PPTEXT - 

PPTEXT 

PPTEXT" 

PPTEXT 

"PPTEXT 
PPTEXT 

TPTEXT" 
PPTEXT 
PPTEXT" 
PPTEXT 



10/18 
10/05 - 

8/35 

"9/27 

8/28 

—8/32" 

4/ 19 

— »M5~ 

9/56 



8/19 
9/16 S 



10/23 



10/31. 



T 



"lRfi ""- CONTAINS, RW - " RELEASE "CHAIN, AQS - AGE QUEUES 
SYMBOLIC REFERENCE TABLE. 



COMPASS 3.75077. 



09/10/75 "09.59.38. 



PAGE 



52 



1Z/50 
13/42 
15/36 
15/39 
18/03 
21/31 
23/53 
23/5? 
24/05 
2*,/ 08 
28/52 
21/26 
19/29 



I 

fc-J 




18/05 S 
18/06 
19/06 
19/15 S 
20/07 S 
24/10 
2-./13 S 
24/16 
24/19 
1,1/08 "S" 



20/12 

46/36 
1,6/39 
18/(45 
Wkt 
18/53 
18/36 
19/01 
14/37 
18/36 
18/51, 



20/08 
20/10 S 
20/39 S 
20/<*0 
20/43 
24/21 S 
24/28 
24/31 
28/51. S 



21/27 S 25/45 S 



20/1,8 21/29 

20/51, 45/49 S 

21/07 S_ 45/54 
"21/08 46/38 S 

21/19 S 46/41 
29/33 



19/04 S 
25/51 S 
IS/92 
277ft8 
t*z/$e> s 
18/17 S 
18/42 S 



42/57 
WIS S 

43/29 8 

46/14 S 
"18/28 



46/18 

(.r/Ofc s 



13/35 S 14/38 



j • 
« 

« 



I 

ru 



tmm - c(SMtws, im- rem 

SYMBOLIC REFERENCE TABLE. 



^CM 



OS 



10 HP, 



7504 



ERRN33 

ER*N34" 

ERSN35 

"ERRN36 
ERRN37 
ERRH38" 
ERRN39 
ERRfK ■"" 
ERRN40 

"ERRtUi" 
ERSN42 

"ERRH43" 
ERRN.,4 

"ERRH45" 
ERRNi.6 

" ERRN47 
ERW.8 

"ERRN59 - 
ERRN5 
ERRN6 "~ 
ERRN7 

"ERRN8" 
ERRN9 



".1 

".3 
"44 

45 
-56" 

47 

50 
5I - 

52 

"53" 

54 
55 
56 



"57 

60 



~5r 

5 

.... 5 _ 

7 

-to- 
il 



"E5TAD1T 



"51"" 



ESTFHA" 



~53~ 



ESriNOSET" 
ESILWA 



57" 
52 



ESTORO 



50 



FC0NY 



2267 



FHAIT1 

HANGMSG" 

INOEX 
"INIT" 

INPFILE 
"IP.CC7- 

IP.IQO 
"IP.LVF - 

IP.NtCN 



2275 
_ 32h5~ 

6 
"1275" "" 

4 
!-- 

6 

7tT" 

4 




IP.OQD 



10 



28/20 

""26/21 
26/22 
28/23 
28/24 
"28/25 
28/26 
27/48 
2R/27 
28/28 
28/29 

"28/30 
28/31 
28/32 
28/33 

"28/34 
28/35 

"28/36 
27/1.9 
27/50 
27/51 
27/52 
27/53 

"27/13 
36/13 
20/20 
20/3*. 
27/19 
20/22 

"20/35 
20/29 
20/33 
20/37 

"27/12 
29/17 

Hl/0i» 

29/16 

29/26 

30/51 

21/23 

5/32 

29/20 

4/05 

5/20 

5/21 

8/43 

30/01 

-|»7/3r 

27/10 

12/34 

6/3." 

-9/35 
6/2E 

"10/25 

29/49 

30/18 

6/27 



~ZT/XW 



"i6/irr 

36/15 S 

20/38 ~ 

27/15 O 
"36/35 F" 
27/14 O 
"F" 



"34/52 
36/25 

"36/26 
36/27 
37/0 8 
31/17 

"41/20 
30/15 



""36/56 
36/57 
34/32 
34/33 

"36/36 
34/ 5 3 

"34/54" 
37/1.0 
37/1.1 
39/C9 
39/10 
41/22 

T,2/04" 



37/01" " 
37/32 F 
3h/34 S 
36/0* f 
36/37 S 
37/1.3 
39/24 ~ 
39/11 S 

39/20 

39/22 S 
39/5* 
42/06 
42/25"— 



37/33 
37/31. 
36/05 
36/06 
37/22 
44/33 

1.0/01 
"42/35" 
1.3/01 
1.3/35 
42/27 



F 37/42 
44/05 

F " 39/23 
43/53 

— 37/24 



"44/06" 
44/07 
43/54 
43/55 
38/02 



F T»4/29 

S 44/32 S 

F " 



43/36 
"44/17F 
44/18 F 
44/19 S" 



44/24 
44731 S" 



O 8/27 S 

F 29/24" S" 

14/05 
D 9/55 S" 
O 8/45 
S 8/50 

L 30/26 

1,7/42-C" 

O 45/56 S 

O 8/52 

F"~" — - 



8/33 S 

"29/56 O 

15/56 S 

9/56 " 

9/06 
9/16S 



10/01 

24/38 

9/22 
9/27 



30/44 F 
31/49 F 



45/57 



8/55 



32/16 F 
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IP.PTCN 13 




29/08 30/15 31/48 32/37 39/42 

—29/46 30/43 32/15 33/05 40/50 "' " ' -- — 

7/12 F 12/36 F 14/01 F 17/52 F 22/01 F 22/07 F 25/13 F 




IP.TF 






IP.TSG " 6607 

IQCOUNT 44 




"' "45/34 " 45/45 F» 46/22 46/33 F 

5/28 D 10/22 S 11/14 S 11/19 S 11/22 11/26 11/34 11/36 


■ 


IQP 100 
IR1TS 3265 




"6/26 7/39 10/32 
46/16 47/47 L 




JREW 23 

JREHM 3162 


"~T>PT£XT 
PPTEXT 


27/25 "41/34 S 7 42/01 S 42/31 
42/34 S 42/41 S 42/42 47/32 L 




LE.oor "'■.2 

LE.FNT 3 


"21/04 21/06 
7/57 




IE. TAPES 10 

LIST 3334 


PPTEXT 


35/45 42/46 

37/08 S 37/<.0 S 39/20 43/35 S 44/24 48/03 




LOCKHASK ■■"■ 40 

LOWSCRAP 40 




6/29 "8/20 

4/14 14/32 15/29 15/55 16/10 




LVECM 16 


""PPTEXT 


"14/20 "S 14/34 S 15/33 16/02* 16/12 
25/48 26/02 




LWA 31 


"4/04 "15/35" 16/09 17/18" """24/09 24/27 

13/29 16/04 16/28 17/30 24/15 24/44 

8/20 

6/20 10/35 10/36 
""■ ~ 20/02 20/28 S "20/32 S 21/06 " 21/06 "" " 
47/35 L 47/53 




L.CPNUH 1/ 

MAXAGE 77 




MOOT '"' 67 "" 

MSGHAL 3225 






MSGXPfc 3211 

MTSCfJT 3267 

MTSTAT "3260 

M.DFM 13 

H.DPP 21 """"" 

M.KILL 77 


PPTEXT 
"PPTEXT 

PPTEXT 
-PPTEXT 

PPTEXT 


TiO/04"S~ ~40/07~S"~" T.1742" """' 47/34 L 
37/19 S 46/46 47/49 L 

46/53"" "47/43'%."""" .' " " '" " ' .-■-_- 

28/5: 
i.6/48 """ -.— --- - ■ - -- - ■ - 

47/3? 


1 


H.KBTSIO ■ Id '- 
M.RPJ 32 


17/47 - 23/54 
19/36 21/33 


i 
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M.STEP " 15 

NEWSTAT 3200 


PPTEXT 


'25/46 "" "" " ~ " " ■" """ " 

43/04 S 43/06 S 47/13 S 47/14 S 47/21 S 47/28 S 47/29 47/33 L 


MOIttAU* 2osb 
OQP 400 
OV.1PK" "342013 
OV.ITS 342423 
PAbiillxM 21 
PFX 3160 


PPIfcXT 
PPTEXT 


41/36 '""" 41/44 42/20 
6/27 7/42 9/13 




21/17" 21/17 TJ ■ : " 

47/47 




"4/17 D """•"" " 
47/31 L 




PHPY 10U 




6/12 6/19 " "6/19 6/19 6/19 6/19 
6/19 6/19 D 6/19 6/19 6/19 6/19 




PRCOUNT 42 




6/19 6/19 6/19 U 6/19 6/19 6/20 

5/27 7/07 S 10/27 S 11/11 11/16 




PREVIOUS 35 




4/11 15/19 15/38 5 16/05 24/26 
14/09 S 15/22 15/52 16/13 S 




PSHlFT 6" — 




"6/13 D 6/19 D 6/19 D 6/19 6/19 U 6/19 U 6/19 U 6/19 U 
6/19 6/19 6/19 6/19 6/19 6/19 6/19 10/24 




PUIHAU 3117 

PUTFLAGX 3116 




43/23 43/33 4//U4 U 
47/03 L 47/31 




P.CST 5 
P.OOT 7 

" P. EST - ' 5" "" 

P.FNT 4 


PPTEXT" 
PPTEXT 
"-PPTEVT" 
PPTEXT 


ZU/Ufe 

20/23 




" "20/17" "" 34717 " """ """"" " "■ " " '"■ " - - - 

7/51 




K.PCUH "5 
P.S8T 2 


PPTEXT """" 
PPTEXT 


12/34 13/56 17/50 23/41 24/35 




P.RQS 13 
P.SCH 60 


PPTEXT 
PPTEXT 


18/02 
10/55 
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PYPCOM 
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— PPTEXT 
PPTEXT 

— -PPTEXT 
PPTEXT 



17/50 



23/i»l 



2U/35 
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R.RCH 
R.SIQ 

SCRAP 

SCR1 
SRCH10 — 
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SRCH22A 

— SRCH228 
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SRCH26 

5RCH30 

SRCH32 

SRCH32A 

SRCH33 

SRCH33A" 
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SRCH36 

SRCHi. 

SRCH-,0 ~ 

SRCH90 

SRCH92 """ 

SRCH93 

SRCH94"" 

SRCH95 

SRCH96 

START 

STAT 



STAT0QT2 
STAT00T4 
-STATOtJT6r 
STATUOT8 
STATUD10 
STATdl 
STCGET " 
STCNO 

STCOK 

STER663X 

STGFLG 

STOKZ 

STS 

STSFAIL 

STSVER 

STStfERX 
STSX 




1107 
"1120" 
1127 
1131" 
11h7 
"116V 
1165 
1174 
1205 
1216 
1023 

~n.tr 

1220 
1225 
121.2 
1247 
1255 
1257" 
37 
22" 



1735 

1737 

1755" 

1756 

1762 

13 
257w 
2566 
2606" 
2621 

37 
2565 
2311" 
23h2 
2333- 
2332 
2310- 
2634 
2501" 
250". 
2515 
2657 
2673- 
2713 
271 -' 
2760 
2762" 
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PPTEXT™- 

PPTEXT 

P<»TEXT 

PPTEXT 
"PPTEXT - 

PPTEXT 
"PPTEXT "~ 

PPTEXT 



8/56 

9/16X 

9/08 
""8/53 " 

9/41 
"10/02 "" 

9/57 
10/15 

9/04 
10/33 " 

7/40 
"9/01 

8/04 
10/50 " 
11/12 
11/17 " 
11/23 
11/27 '""" 

4/13 
"20/47 
20/53 
20/14 
20/13 
20/32 
20/33 
20/30 
27/11 I 
"41/04 
40/12 
"40/23 ~ 
41/34 I 

5/22 I 
'•Q/lft 
31/02 I 
32/37 
31/05 
31/30 I 
31/01 1 
41/33 
'39/20 I 
39/22 I 
39/21 
42/02 
42/30" 
42/44 I 
42/32" 
43/18 
"43/21" 
45/41 
"20/51 
20/52 
37/17 " 
20/46 
20/57" 
20/41 

9/2B 

8/29 



L 
L 

L 
L 

L" 
S 

S 



9/04 t 
"10/38 

9/14 

9/03 -'"- 

9/>«6 
IB/0 8~D"~ 
10/06 
10/22 L 

9/40 
10/37 

7/45 L 
" 9/06 V 
10/49 L 
10/55 
11/16 
il/21 
11/29 
11/34 
14/11 
21/01 
21/10 
20/36 
20/16 L 
21/13 " 
20/42 
20/37 L 



41/07 
40/21 
40/28 
42/17 
7/20 
40/33 
41/23 
33/16 
31/18 
33/14 
31/28 
41 /.46 
39/25 
42/44 
39/53 
<*2/18 
42/33 
43/24 
42/46 
4 3/24 
43/26 D 
46/29 
20/51 
20/52 



9/18 
9/27 L 



10/14 L 

9/45 
10/40 L" 



9/23 L 



10/20 



9/29 



10/26 



10/31 L 



15/24 S 
27/24 
43/16 



17/19 
43/19 
43/27 



47/15 
47/22 



47/56 S" 



40/26 
"40/33 

■ g/o 2~~ 

42/07 "•'"' 

31/31 TJ" 



40/31 
•41/14"tT _ 



40/34 L 



42/23 D 



i 43/02" 
L 43/40 



"47/57 



20/46 
20/57 D 
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STUDY QUESTIONS 
Sample PP Programs - Section XIV 

!• How does the calling CP Program usually know when a PP program 
has completed its task? \ _____ 

5- How does the PP programmer generally determine if a PP program 
has done its task ? 

3« How does a PP program usually get parameters passed to it from 
the GP. user? ..'.... 

M» How does a CP program wait for a PP program to complete a task? 



S- When is a PP program hung in Auto Recall? 

b. What is a PP call error? 

?• How do you hang a PP? 



fl- How do you un-hang a PP? 



c \' List the main functions of - 1RN 
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STUDY QUESTIONS 
Sample PP Programs - Section XIV 

1- How does the calling CP Program usually know when a PP program 

has completed its task? bo* je?//'"^ 7/^ Ce*H0/&4^ £af/ 

2- How does the PP programmer generally determine if a PP program 
has done its task? >*t&<5Za# : a<s or <zU**~*/>s 

3- How does a PP program usually get parameters passed to it from 
the CP user? P&*&»*t est***** /-*» f^b-m. V~^7". 

4- How does a CP program wait for a PP program to complete a task? 

5- dJhen is a PP program hung in Autp Recall* / j 

C*J L*n* y^^s- Ccr^j0 AethZ ^£z£ Aj *** ' ~ r ^' 

E>- What is a PP call error; ? r>0 Pf r^^r***-? L^ T*,^ 

7- How do you hang a PP ? •^C^tU^tf-*- <* UXjrar^,^ e&et e. S**-*s > l* & <-*e^ 



3« How do you un-hang a PP? 
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1- List the main functions of - 1RN 
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3s. Si 
3 Si' 



STTk 



J 



0000 
"2 020 
QCNQ 
00d0 
0100 
0120 
0148 
0160" 
0200 
022Q 
0240 
260" 
0300 
0320 
34 
03oQ 
0400 
0'.20 
0440 
"04oG 
05UQ 
0520" 
5 40^ 

0600 

G620 " 

64 

66 

0700 

72Q 

0740 

0760 

1000 

1020 

1040 

1060 

1100 

112 0" 

1140 

1160 

1200 

122 

1240 

1260" 

130 

1320 

1340 

1360 

1400 

" 1420 
144 
1460 
150Q 
11)20 
154 

" 1560 
1600 
1620' 
1640 



00 35 
3007 
3006 



1070 

3112 

0200' 

1177 

1217 

3Q10 

34 01 

1204 

3bl3 

0202 

1411 

64 02 

6210 

0100 

04 42 
3612 
1137 
2000 

05 03 
1625 
0340" 
2100 
5161 
0604 
1063 
0343 

' 0002 
1071 
020 
5103 
3456 
2624 
3001 
6037 
5454 
OOP 4 
04u3 
7620 

" 1426 
54 UO 
343 7 
30 37 

3054 
"5000 
1507 
1536 
2711 
0200 
0100 
' 3042 
3317 
7017 
5653 



7512 . 7712 

1071 1714 

3444 17 01 

010 00 30 



3410 
3113 
1331 
1265 
0560 
0507 
0101 
0524 
1063 
2000 
55 
0001 
1422 
0202 
54 " 
1277 
0513 
335/ 
0100 
6010 
1401 
4000 
b62Q 
1416 
1Q06 
460 4 
3445 
0503 
5466 
0311 
0100 
6010 
0502 
3037 
7023 
3443 
0200 
322 6 
633 4 
2776 
*l<tuQ 
17-5 
0404 
5401 
7021 
15 07 
1524 
1315 
5146 
1315 
1014 
044 7 
"0426 
0200 



50 10 
3114 
0322 
1440 
1444 
3005 

3014 
3512 
2623 
0206 
5002 
6010 
6210 
0437 
17 45 
3010 
3411 
0104 
3003 
340 3 
0604 
0563 
0200 
3161 
0200 
5004 
010 
30 56 
1401 
0112 
3011 
3432 
0405 
5054 
2140 
2620 
Q7U3 
4012 
54J0 
03 J4 
0703 
53 54 
7020 
3454 
1507 
24 4-. 
2/45 
0100 
30 ',2 
31,3 
3407 
0200 
563 5 



siO? 
3413 
0576 
00 01 

6777 

0570 

3663 

6222 

6010 

3414 

0360 

32 53 

3002 

6010 

30 26 

0002 

3614 

3044 

0354 

5 60 

12 77 

3610 

2 00 

1377 

3015 

1400 

3007 

5316 

5400 

5757 

00O3 

10 42 

6277 

3454 

1400 

3114 

1400 

1401 

70 22 

3547 

5600 

2176 

0100 

3004 

1553 

0100 

7017 

1437 

5054 

15 07 

24 44 

15 42 

1317 

10 14 

6010 

10 70 

5/24 

2000 



7712 

0403 

7700 

0003 

3056 

1006 

1450 

53 o 3 

7014 

3026 

1410 

0267 

3414 

6210 

3023 

0402 

05o6 

1604 

047 3 

0100 

1466 

1135 

03o5 

6111 

1006 

3404 

020 

lo67 

0341 

7721 

30*5 

3406 

3044 

3062 

3056 

3406 

0327 

34o0 

3454 

0565 

1001 

120 

7777 

1223 

1400 

5000 

6414 

05ol 

6010 

7020 

1507 

3/61 

2/^0 

50^4 

3143 

3014 

340 6 

3153 

1604 



0010 
30Q5 
0040 
0001 
b037 
0407 
6010 
U170 
2300 
3212 
3410 
341 
5014 
5700 
1006 
03/1 
1430 
12/7 
2000 
U'.l7 
3512 
505 
3761 
3 007 
3102 
1020 
5163 
6010 
30 04 
1400 
0502 
C410 
0503 
1710 
3452 
34 07 
3 60 
30 32 
0200" 

1401 

6010 
1705 
1630 
150 
3463 
1323 

IhOI 

3014 

54 

1507 

3735 

1315 

7 017 

6010 

5354" 

1007 

6134 

5400 



7712 

0302 

0100 

0001 

303/ 

16 01 

30 i* 

3401 

6453 . 

070a 

30 55 

026/ 

7020 

0272 

3514 

3625 

6010 

0510 

34 0/ 

20 00 

10/1 

2000 

0504 

1620 

1014 

721 

03 5.1 
3011 
2200 
5400 
0371 
1007 
0100 
07 05 
0200 
0200 
1701 
0504 
1331 
0306 
1701 
0704 
654 
5300 
0100 
54 54 
50 37 
3401 
0406 
70 21 
1507 
25 77 
6414 

04 10 
3014 
7021 
1601 
7 720 
5653 



1400 
3007 
0010 
0001 
040 3 
6015 
0413 
0101 
1065 
2177 
6210 
2 00 
0416 
70 5 
1063 
.1063 
2 000 
140 4 
540 
3357 
1741 
33 3 
30>0 
6015 
1370 
1017 
3007 
3114 
3062 
7722 
4045 
1620 
0112 
5G06 
1331 
6111 
0505 
0200 
03o3 
20 
6015 
1401 
4046 
2776 
010 4 
7023 
1437 
5001 
10Q6 
3054 
150 7 
6411* 
3752 
3407 
5454 
0461 
0200 
5000 
0100 



POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 

poa 

POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 

poo 

POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 
POO 

poa 

POO 

II -I A 



0010 
0030 
0050 
070 
0110 
130 
0150 
01/0 
0210 
0230 
0250 
02/0 
0310 
330 
0350 
03/0 
0410 
0430 
0450 
0470 
0510 
0530 
550 
05/0 
0610 
0630 
0650 
0670 
0710 
0/30 
0750 
0770 
1010 
1030 
1050 
1070 
1110 
1130 
1150 
1170 
1210 
1230 
1250 
1270 
1310 
1330 
1350 
13/0 
1410 
1430 
145 
1470 
1510 
1530 
1550 
1570 
1610 
1630 
165U 

i I V (I 



7412 

12 4 
1464 
0004 
0100 
3015 
145 

0452 
3ZZ7 
0200 
0100 
I6b5 
1717 
0404 
3524 
0100 
3514 
7720 
3414 
0553 
5400 
17U1 
3015 
0411 
0622 
020 
0555 
05/3 
540U 
05/5 
601Q 
3040 
6600 
3 37 
3060 
0200 
540 6 
2000 
1331 
3014 
5400 
1102 
3413 

14 UO 
0100 
3 401 
7020 
0o25 
3153 

15 7 
1613 
3253 
1403 
7021 
3014 
5163 
7721 
1315 



7112 0013 
C505 2010 
5523 3552 



7 00 
2754 



U1J0 
6350 



0013 

3013 



0006 
0446 
2631 



1000 

0403 

6277 

0545 

2000 

0621 

5146 

2100 

6010 

05 6 

3513 

3045 

3514 

1071 

2 00 

3613 

2 

043/ 

34bl 

1140 

3212 

3026 

5163 

3003 

3062 

7723 

30 26 

3010 

1217 

1710 

0510 

0434 

4347 

C302 

6001 

5054 

0522 

1200 

0404 

15 

34 3 7 

0162 

0101 

0405 

1.4 

3452 

150/ 

£4 75 

0403 

0200 

02U0 

5454 

0100 

1317 

020 

4.(1 P. 1 



1444 
0200 
3014 
10o3 
1.7 2 
0304 
3026 
0011 
3402 
1413 
1063 
0312 
10/1 
1774 
15U0 
1277 
3333 
0100 
3 4 6 
2200 
1U14 
3216 
30 56 
0513 
1703 
5400 
5245 
2200 
3406 
0720 
3656 
3055 
0713 
37 32 
3454 
7022 
3 441 
03-*3 
3 64 
5300 
30 52 
5054 

33 54 
5400 
6037 
17 ,3 
2 475 
14 47 
5316 
1323 
7021 
1551 
3143 
1323 
•< (. u a 



6010 

5146 

1601 

1150 

5500 

2100 

1073 

6010 

2000 

0302 

3512 

3402 

1745 

0503 

54 

1/41 

3412 

0464 

1007 

3040 

3213 

0705 

6010 

30 37 

0770 

7724 

0001 

1000 

3056 

1420 

2300 

6010 

0310 

01C0 

3153 

0471 

3017 

3044 

1/02 

3004 

623 7 

7023 

3052 

0410 

1345 

0100 

6414 

16 53 

6246 

0603 

3037 

3054 

3043 

5400 

5054 



3013 
1400 
3452 
1135 
0206 
4000 
1203 
3013 
140 
14 33 
2 00 
',0 02 
050 3 
3414 
7721 
l>5o7 
2000 
3011 
34 07 
0525 
0o05 
2177 
3010 
1620 
2012 
0200 
0771 
544 
6134 
5400 
2b36 
3010 
3032 
0104 
3452 
5400 
3312 
0421 
0746 
3414 
03O5 
0404 
2177 
3354 
1401 
1346 
4017 
3677 
3o52 
010 
1144 
1074 
1217 
7/21 
7017 
3410 



1066 
6010 
603 7 
0545 
1404 
0615 
3401 
3314 
3514 
5400 
2523 
0403 
0100 
3613 
20 
2000 
0100 
10/1 
1625 
3 007 
1421 
3777 
05/0 
6015 
3401 
6326 
3045 
0200 
7720 
511/ 
504 
1106 
3401 
3055 
6037 
1151 
0406 
3046 
3043 
14 41 
3052 
3410 
5075 
0370 
3414 
0100 
3160 
1321 
6037 
1321 
U403 
2100 
3443 
2000 
3407 
2f)B0 



0416 

3010 

32 5 3 

0747 

3525 

3055 

5001 
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7536 
3*10 
7515 
0656 
3407 
7626 
3076 
U220 

40 


3.'il0 

3 74 
5010 
1602 

4 07 
3713 


0200 
1601 
0007 
0767 
1377 
30 75 


7551 
6210 
5400 
0566 
210O 
1602 


3613 
30 
7626 

2000 

6213 


3075 
0013 
3075 
7640 
♦ 4 7 
0130 


1602 
0037 
5 410. 
3406 
0366 
7563 


PU7 

P07 '" 
P07 


75m 

'7560 
, 7600 


■;■ P07 ' . 

P07 

P07 " '" 


7620 

7b-«0 

7t)60 

7700 
" 7720 " 

7740 . 
"776 0" "' 


3bi3 

001b 
6911 ' 
0001 

~ 3*00 
0005 

"'7060 ' 


0312 
7623 
"3075' 
0001 
3420 
0005 


3U17 

762 5 

"6310 

34*0 
0005' 
7 020 


65 00 

7 5 36 

5*1 
3460 
0005 


7623 
01U0 
6211 
1.730 
35il0 
OOO'S 


7 1 30 
7563 
1403 
0005 
3520 
0005 


6002 
301U 
341'. 
2 6 65 
3560 
0005 
00 02 


3017 

5400 
l'.0& 
0023* 
3640 

0005 


1001 
0351 
0403 
410 
-.732 
0001 


5410 

0002 
412 0. 


00 04 
5534 
3b5 7 
0005 
0005 
0003 


1402 
375 7 

4 4 
0005 


3410 
3333 
5733 

00 5 
0001 
0007 


1400 

' 0005" 

4057 

0005 

"0023 


P07 

— -P37 ' 

s P07 

..... pQ7 ...... 

P07 

... po7 
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EXAMS 
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PROBLEM 1 

Write a PP program named MVN which will: 

1« Write in the jofa T s dayfile the following message: 

PP PROGRAM CODED BY • 

Fill in the blank with your name- 
Note: Write a calling CP program to check it out- 
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PROBLEN 3 



Write a PP program named flYN to: 

!• Find the name of the job which caused it to be 
executed' 

5. Find the control point number of the calling job- 

3- Print the Job Name and control point number in the 
job T s dayf ile« 

Notes Write a calling CP program to check it out* 



is-a 



PROBLEM 3 {OPTIONAL} 



Write a PP program named MYN which will: 

1- Get to numbers from a central memory buffer- BUT 
2« Sum these two number- 
s' Place the sum of the numbers in a central memory 
location* ANS 

Problem Data* 

BUF DATA 123-, HSh 

ANS BSSZ 1 



Notes Use proper communication to retrieve the data and 
terminate the calling CP program when the sum is 
placed in ANS« 

Write a calling CP program to check out program- 
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PROBLEM M {OPTIONAL} 



Add a new control card to the system called CTO {Comment 
to Operator** Modify 1AJ to process the new control card- 
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PROBLEM 5 {OPTIONAL* 



Write two PP programs to communicate with each other* 
Have the second of the programs write a message in the 
dayfile telling what PP -CNo«> called it. 
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SOLUTION PROBLEM 1 



riESl 



IDENT 

LIST 

PERIPH 

SST 

ORG 

PPENTRY 

LDC 

RJfl 

LDN 

RJfl 

LJM 

DIS 

EN]) 



MVNi C-PPFWA 
Hi G 



OPPFUA 

D-IRBi D-TO 

MES1 

R.DFM 

M-DPP 

R.flTR 

R-IDLE 

,*PP PROGRAM CODED BY 
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SOLUTION-. PROBLEM H 



IDENT 


MYN-i C-PPFUA 


LIST 


fin G 


PERIPH 




SST 




ORG 


C-PPFUAn]>"TO 


L3>N 


1 


STD 


D-Tl 


LDD 


D-CPAD 


ADN 


bNCPJNAfl 


CR11 


tlSGi D-Tl 


LDI1 


MSG+M 


SCN 


77B 


STM 


MSG+M 


LDD 


D-CPAD 


SHN 


-7 


RAH 


CPNO 


LDC 


NSG 


RJI1 


R-DFM 


LDN 


n-DPP 


RJfl 


R-riTR 


LJM 


R.IDLE 


fISG 


BSS 




DIS 


CPNO 


Ei3U 




END 



Set CM Word Count 
Get Cant. Pt- addr. 
Add ordinal of Job Name 
Read Job Name into message 
Clear 
ath 

character 
Get* Cont* Point addr* 
Convert to Control Pt- No* 
Add to Control Pt* in Msg« 

Get Msg* Addr 
Print riSG 
Load Drop PP Code 
Ask riTR to do it 
Go to Idle 

5 Space for Job Name 
n* WAS EXECUTED AT CONTROL 
POINT OD* 
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ALS COURSE S2 
FINAL EXAM 
PP COMPASS 



1- PP COMPASS generates} 



-CaJ BCD Code 

<b> Binary object code 

•Cc> Relocatable code 

•Cd> Compiler code 

•Ce> None of the above 

PP COMPASS is a . language- 

-CaJ Machine 

■Cb> Compiler 

•CcJ High Level 

■CdJ Assembler 

PP programs are entered into the SCOPE system by} 

■Ca> bRM 

■Cb> UPDATE 

-CcJ COMPASS 

-Cd> EDITLIB 

A PP must do all Input/Output operations for SCOPE- 

-CaJ true 
-Cb> false 

A data channel isi 

-CaJ a device to transmit data to I/O equipment 

-CbJ a device to transmit data from one PP to another PP 

•£c> a required device for any I/O to a peripheral 

•£d> a 12-bit bi-directional data path. 

Ce> all of the above 

Given the octal data} 

PP location contents 

1QD 1111 

liJhat is the result of the following PP code sequence? 





LDM 1DDB 




ADD 10CB 


■Ca> 


A- 0Q2222 Octal 


-Cb> 


A= 111111 Octal 


-Cc> 


A- DODODD Octal 


■£d> 


A= 771111 Octal 


■CeJ 


None of» the above 
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ALS COURSE S2 
FINAL EXAM 
PP COMPASS 



PP COMPASS generates} 




BCD Code 
Jibi ? Binary object code 
■CcJ Relocatable code 
-Cd> Compiler code 
-Ce> None of the above 

PP COMPASS is a ■ mmmmmm . language* 

-CaJ Machine 
<b> Compiler 
tc> High Level 
CCdD Assembler 

PP programs are entered into the SCOPE system by} 

bRM 

UPDATE 
COMPASS 
EDITLIB 

A PP must do all Input/Output operations for SCOPE" 

Cla£ ? true 
-Cb* false 

A data channel is} 

■Ca> a device to transmit data to I/O equipment 
<b> a device to transmit data from one PP to another PP 
■Ccl a required device for any I/O to a peripheral 
•Cdl a 12-bit bi-directional data path- 
CjCej£ ) all of the above 

Given the octal data} 

PP location contents 

1QQ 1111 

What is the result of the following PP code sequence? 








LDM 


1DDB 






ADD 


1DDB 


•Ca> 


A= 


0D2222 


Octal 


-Cb> 


A- 


111111 


Octal 


-Cc> 


A= 


00D00D 


Octal 


J^> 


A= 


771111 


Octal 


TeT^ 


> Noi 


ie of th 


e above 
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?• The RJfl instruction is used to 

<a> begin execution of a PP program 

-Cb> return to the SCOPE System 

-Cc> interrupt a PP program 

•Cd> provide linkage to a subroutine 

fl. The system symbol D-RA refers to 

Ca> a CF1R location 

•Cb> a direct cell in the PP resident 

■Cc> a distant reference address 

id> a dummy location in the PP 

T. A PP program name is c haracters in length' 

•Ca> ID 

*b> 1 

■Cc> 14 

-Cd> 2 

■CeJ none of the above 

ID. A MACRO is 

■Ca> a closed subroutine 

-Cb> a system entry point 

•£c> an open subroutine 

•CdJ a pre-defined sequence of code 

11- SCOPE uses CUR fori 

-CaJ Pointers 

■Cb> Tables 

•Cc> Libraries 

-Cd> all of the above 

■Ce> none of the above 

12. The SCOPE system PP routines: arB pointed to byi 

-Ca> P-PJT 

•CbJ T.PPIP 

■Cc> T-PPID 

■CdJ P. LIB 

13- PPRES is code which 

<a> resides in all PPs 

•Cb> is a loader 

•Cc> is a utility package 

■CdJ all of the above 
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7« The RJfl instruction is used to 

•Ca* begin execution of a PP program 
-Cb> return to the SCOPE System 
i^j- interrupt a PP program 
Ctd'0 provide linkage to a subroutine 

3- The system symbol D-RA refers to 

#a CI1R location 
a direct cell in the PP resident 
a distant reference address 
■Cd> a dummy location in the PP 



A PP program name is 



characters in length- 



•Ca> 
-Cb> 
-Cc> 
■CdJ 



ID 
1 
^ 
2 



10. 



CTte^ none of the above 
A tlACRO is 



<a> 
■Cbl 



a closed subroutine 

a system entry point 

an open subroutine 

a pre-defined sequence of code 



11- SCOPE uses CUR fori 



Pointers 

Tables 

Libraries 

all of the above 

none of the above 

12- The SCOPE system PP routines, am pointed to byi 




P-PJT 
T.PPIP 
T-PPID 
P-LIB 



13- PPRES is code which 




ia> 
-Cb> 

-Cc> 
T3! 



resides in all PPs 
is a loader 
is a utility package 
all of the above 
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14. What is the name of the PP resident routine to issue a dayfile 
message? _____,_______>_______-_____--___— ____— _^ 

IS- SCOPE is controlled by a monitor which 

■Ca> resides on disk 

•Cb> resides in PP1 

Cc> resides in ECS 

-Cd> resides in PPO 

lb- The SCOPE Operating System may be halted temporairly with the 

monitor function- 

■Ca> PI- STOP 

•CbJ M-KIkL 

-Cc> II. PASS 

-Cd> H-STEP 

17- In a 10PP systems PPO may communicate with 

-ta> T other PPs 

■CbJ 1 other PP 

ic> 4 other PPs 

■Cd> a other PPs 

13- All channels may be used for communication between PPs- 

<a> true 
>b> false 

IT- SCOPE is normally deadstarted initially 

-CaJ from a card deck 

•Cb> from a paper tape 

-Cc* from a disk file 

•Cd> from a magnetic tape 

2D- Relocatable Overlays in PP coding are 

•CaJ relocatable binary code 

<b> Absolute binary code 

-£c> Relocatable absolute binary 

■Cd> BCD code 

51- Most SCOPE system routines are: 

■CaJ PP routines 
-Cbl CP routines 
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14- What is the name of the PP resident routine to issue a dayfile 
message? £?• «0/vW 

IS. SCOPE is controlled by a monitor which 

■Ca> resides on disk 

-Cb} resides in PP1 

Igi resides in ECS 

C-CdL ^ resides in PPO 

lb- The SCOPE Operating System may be halted temporairly with the 

monitor function* 

■Ca> H.STOP 
■Cbl H-KIkL 

<s> n.PASs 

:dA> II -STEP 



17. In a 1DPP systerm PPO may communicate with 

/t4L ^ 1 other PPs 
i&> 1 other PP 
ic> 4 other PPs 
■CdJ 2 other PPs 

Ifi. All channels may be used for communication between PPs« 

($3£> trua 
>b> falsa 

IT- SCOPE is normally deadstarted initially 

ia> from a card deck 
ib> from a paper tape 
Cc^ from a disk file 
<^£d£ > from a magnetic tape 

HO- Relocatable Overlays in PP coding are 

-Ca> relocatable binary code 
Cb> Absolute binary code 
CicU Relocatable absolute binary 
•Cd> BLD code 

21- Most SCOPE system routines are: 

"TaJ^ PP routines 
i> CP routines 
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